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REM € 
IDENT IF [CATION 


PRODUCT CODE: AC 18538 MC 

PRODUCT NAME; COKDABO "D111 8 CLUSTER DIAG 
PRODUCT DATE: APRIL, 19A8 

MAINTATNER;: DIAGNOSTIC ENGINEERING 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOUD NOT BE CONSTRUED AS A COMMITMENT Br DIGITAL 
EQUIPMENT CORPORATION, DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAT APPEAR IN THIS DOCUMENT, 


NO RESPONSIBILITY [S ASSUMED FOR THE SE OR RELIABILITr OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED Br DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGH? (C) 1984 Br DIGITAL FQUIPMENT CORPORATION 


Tet FOLLOWING ARE TRADEMARIS OF DIGITAL EQUIPMENT CORPORATION: 


DIGITAL PDP UNTBUS MAS SBUS 
DEC DE CUS DEC TAPE 


SEQ 0001 
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i. PROGRAM ABSTRACT 


THIS PROGRAM TESTS OUT KDJ11-8 CPU BOARD, INCLUDING THE Jil CHIP SET, 
ome CACHE, ON BOARD ROM'S, SERIAL LINE UNIT, AND LINE TIME 
L KS . 
THE KDJi1-8 IS A POP-i1 CPU THAT INCORPORATES THE Jil CHIP SET AS THE 
HEART OF THE PROCESSOR. IT IS A QUAD HEIGHT Q22 BUS MODULE. IT HAS 
ON-BOARD CACHE, SOME OF THE FUNCTIONALITY OF THE CACHE IS HIDDEN INSIDE 
THE J11 AND THE REST OF THE FUNCTIONS IMPLEMENTED IN TWO ON-BOARD GATE 
ARRAYS, THE STORAGE CAPACITY OF THE CACHE IS 4K BYTES OF RAM, CALLED 
DATA RAMS, THE CACHE IS IMPLEMENTED AS A DIRECT MAPPED CACHE WITH 
ca ston 21 THROUGH 13 STORED IN A DIFFERENT SET OF RAM’S CALLED 

? . 
THE KDJ11-B8 ALSO HAS TWO ON-BOARD ROM'S. ONE OF THEM, THE 16-BIT 
ADDRESSABLE ROM, CONTAINS THE SELF-TEST AND THE BOOT CODES. THE OTHER 
ROM, THE 8-BIT ADDRESSABLE ONE, CONTAINS THE BASE AREA WITH HARDWARE 
SELECTION PARAMETERS, OPTIONAL BOOTSTRAPS, OPTIONAL UFD CUSER FRIENOLY 
+ Ty ance S’STEM DESCTIPTION AREA, AND OPTIONAL FOREIGN LANGUAGE 

xT, 
THE SERTAL LINE UNIT IS IMPLEMENTED THRU A DLART CHIP WHICH PROVIDES 
THE STANDARD CONSOLE INTERFACE TO THE CPU. IT HAS INTERNAL LOOP BACK 
MODE AND PROVIDES WITH THREE CLOCK LINES: 800HZ, 60H7, AND SOHZ. 
THE LINE TIME CLOCK FUNCTIONS ARE IMPLEMENTED JSING THOSE THREE LINES 
AND THE BEVENT LINE. THE LINE CLOCK STATUS REGISTER IS IMPLEMENTED IN 
ONE OF THE GATE ARRAYS. 


2. SYSTEM REQUIREMENTS 
HARDWARE REQUIREMENTS 
TO RUN SUCCESSFULL1 THE DIAGNOSTIC NEEDS: 
1. "O11 B CPU MODULE 
2. CONSOLE TERMINAL 
8, AT LEAST 28K OF MEMORY 
IN DVT, AND STAGE ONE MANUFACTURING (MODULE ASSEMBL') "HE Qoe BUS 
EXERCISER IS NEEDED 10 CHECK Q>o BUS LOGIC. 


3. LOADING AND STARTING PROCEDURES 


TO START © THIS PROGRAM; 
1. BOOT xxOP. 


e. TrPE “R NAME”, WHERE NAME 1S Trt NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM, 


THe STARTING ADDRESS OF THE PROGRAM IS 200. 

NOTE: IF TRYING TO RESTART THE PROGRAM IN AN ARBITRARY PLACE AFTER 
HALT ON BREAK THE FOLLOWING REGISTERS SHOULD BE SET LF; 

1777?S?2+0 TO DISABLE MEMMOR? MANAGEMENT 


SEQ 000% 
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1777?7520+1000 TO CLEAR DIAGNOSTIC MODE (BIT 8), Bul STILL SAVE 
HALT ON BREAK 
177777462400 TO FLUSH THE CACHE 


4. SPECIAL ENVIRONMENTS 


THE PROGRAM IS APT COPPATIBLE. IT CAN ALSO BE RUN UNDER THE UFD MONITOR. 
IN THOSE CASES NONE OF THE STANDARD ERROR PRINTOUTS OCCUR. REFER 
ide DOCUMENTS ON RUNNING PROCEDURES IN APT AND UNDER 


5. PROGRAM OPTIONS 


THE Q22 BUS EXERCISER IS UTILIZED IF IT IS PRESENT IN THE SYSTEM AND 
THE DIAGNOSTIC IS NOT RUNNING IN UFO MODE. 

STANDARD CAPABILITIES OF LOOPING ON TEST AND ON ERROR ARE PROVIDED. 

IN ORDER TO RUN THE EXTENSIVE CACHE DATA RAM TEST BIT 7 HAS TO BE SET 
IN THE SOFTWARE SWITCH REGISTER. TO RUN THE EXTENSIVE CACHE TAG RAM TEST 
BIT 6 HAS TO BE SET IN THE SOFTWARE SWITCH REGISTER. 


SWITCH REGISTER SELECTION: 

BIT NUMBER USE 
HALT ON ERROR 
LOOP ON PRESENT TEST 
INHIBIT ERROR TYPEQUTS 
INHIBIT ITERATIONS 
BELL ON ERROR 
LOOP ON ERROR 
LOOP ON TES’ IN SWR<S-O> 
OO EXTENSIVE DATA RAM TEST 
DO EXTENSIVE TAG RAM TEST 


ree re ee 
A~BOOerwsy 


6. EXECUTION TIMES 


WITHOUT EXTENSIVE RAM TESTS, THE OITAGNOSTIC RUNS IN UNDER 15 SECONDS. 
WITH THEM, IT TAKES ABOUT 2 MINUTES, 


7. ERROR INFORMATION 

IN THE CH&SE OF ERRORS, A FAILING PC AND TEST NUMBERS ARE GIVEN. 
WHERE IT IS POSSIBLE, EXPECTED AND RECEIVED DATA ARE GIVEN. 
FOR AN FX AMPLE, SEE SECTION 8, 

8. EXAMPLES 


AFTER BOOTING xxXDP+- AND STARTING THE PROGRAM, THE § Oi LOWING 
WI. . APPEAR ON THE TERMINAL: 


*DJ11 86 CPU DIAGNOSTIC 
SWR = KeORKM NEW 
WHERE *xxxKxxK CORRESPOND 10 PRESEN! SOFTWARE SWITCR REGISTER 


SEQ 0004 
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SETTING. 

AFTER “NEW” AN OPERATOR CAN DO ONE OF THE FOLLOWING: 

1) TYPE IN A NEW SOFTWARE SWITCH REGISTER SETTING FOLLOWED 
By CARRIGE RETJRN OR 

2) JUST TYPE IN CARRIAGE RETURN IN WHICH CASE THE SOF TWARE 
REGISTER WILL REMAIN UNCHANGED. 


EXAMPLE OF ERROR PRINTOUT: 
ERROR IN TAG STORE 
TEST ERROR ADDRESS ADDRESS 
° PC <21-16> «15-0» 
2? 105620 66600 000000 
NOTE: THIS MAY NOT CORRESPOND TO THE ACTUAL PROGRAM COUNTER. 


9. PROGRAM DESCRIPTION 


9.1 J11 CODE 

THIS PORTION OF THE CODE TESTS OUT THE J11 CHIP SET. IT IS BROKEN 
INTO 3 PIECES: CPU TESTS, WHICH VERIFY DIFFERENT INSTRUCTIONS IN 
DIFFERENT MODES AND DIFFERENT TRAP CONDITIONS; MMU TESTS, WHICH 
VERIFY OIFFERENT FUNCTIONS OF MMU; AND FFP TESTS, WHICH DO 
OIFFERENT FLOATING POINT INSTRUCTIONS. 

THIS PORTION OF THE CODE HAVE BEEN WRITTEN IN CLOSE RELATIONSHIP 
WITH THE J11 MICROCODE. THEREFORE, EVEN THOUGH NOT ALL POSSIBLE 
INSTRUCTIONS IN ALL POSSIBLE ADDRESSING MODE HAVE BEEN TESTED, AN 
ATTEMPT HAS BEEN MADE TO EXERCISE ALL OF THE MICROCODE. 


9.2 CACHE CODE 
THIS PORTION OF THE DIAGNOSTIC VERIFIES ALL CACHE FUNCTIONS. 
DATA AND TAG RAM'S TESTS ARE ALSO INCLUDED. 


SSHHSSHSSSSHSHSSSHSSSHHSSSSEHSHSSHESHSSEHHHESSSEHSHSEHESSEHESESHEHESHEHESHSESSEHEHEEHHHEKEEKROEEOEE 


NOTE: IN ORDER TO RUN EXTENSIVE CACHE RAM’S TESTS THE CORRESPONDING 
BITS IN THE SOFTWARE SWITCH REGISTER SHOULD BE SET. SEE SECTION 5. 


SSESHESSHESSSHESHESSEHSSSESHEAESSSSSHHSSHEHEHESSHEESHEHSHESHEHESHEHEHESESEHEESSESEHEHEEEEEHEESEE 


9.3 ON-BOARD ROM'S CODE 
THESE TESTS VERIFY THE CHECKSUMS OF THE 16-BIT ROM AND THE BASE 
AREA OF THE 8-BIT ROM. 


9.4 LINE TIME CLOCKS CODE 

THIS PART OF THE PROGRAM VERIFIES THE FUNCTIONS OF ALL 4 CLOCK 
LINES: 3 OF THEM FROM THE SERTAL LINE CHIP (SOHZ, 60HZ, 8002) 
AND BEVENT LINE. 

NOTE: IN UFD MODE ONLY FUNCTIONS CORRESPONDING 'O BOOT ROM 
SELECTION ARE CHECKED, 


9.5 SERIAL LINE UNIT CODE 
THESE TESTS VERIFY THE FUNCTIONALITY OF THE Siut CeIP UTILIZING THE 
MAINTENANCE MUDE OF THE CHIP. 


SEQ 0005 


(| 
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eS? 9.6 Qe22BE CODE 
238 THESE TESTS VERIFY INTERRUPT ARBITRATION OF THE KDJ11-B, A 
<39 PROTOCOL, AND CACHE FUNCTIONS RELATED TO THE DMA ACTIVITIES, 
240 INCt UDING PMG ZOUNTER, 
241i 
ea2 & 
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oe 
eas 


lo "400 
OE 200 


QO000 1 


000250 


177572 
177574 
177576 
172516 


177600 
177602 
177604 
177606 
177610 
177612 
177614 
177616 


177620 
177622 
177624 
177626 


HI | 
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$SWR = 167400 

$ SWRMK = 300 

.TITLE COKDABO KDU11 8 CLUSTER 
s*COPYRIGHT (C) DEC 83 
s*DIGITAL EQUIPMENT CORP. 
:*MAYNARD, MASS. 01754 


i*¢ 
;¢PROGRAM BY DIAG. ENG. 


3¢ 
3¢THIS PROGRAM WAS ASSEMBLED USING THE POP 11 MAINDEC Sr1rSMAC 
3; PACKAGE (MAINDEC-11-DZQAC-C8), OCT, 1982. 


3¢ 

$TN=1 

-SBTTL OPERATIONAL SWITCH SETTINGS 

3° 

36 SWITCH USE 

3¢ - -- _ — + sc a@eaeeeesn ene eb een be 

36 15 HALT ON ERROR 

3¢ 14 LOOP ON TEST 

3¢ 13 INHIBIT ERROR TrPEQUTS 
3° 11 INHIBIT ITERATIONS 

:¢ 10 BELL ON ERROR 

34 9 LOOP ON ERROR 

3° 8 LOOP ON TEST IN SWR<5:0> 
3° ? DO EXTENSIVE DATA RAM TEST 


36 6 DO EXTENSIVE TAG RAM TEST 
.SBTTL MEMORY MANAGEMENT DEFINITIONS 


3¢KT11 VECTOR ADDRESS 
MMVEC= 250 
3*KT11 STATUS REGISTER ADDRESSES 


SRO= 177572 
SR1= 17/574 
SRe= 177576 
SR3= 172516 


s@USER “I*" PAGE DESCRIPTOR REGISTERS 


UIPDRO= 177600 
UIPOR1= 177602 
UIPOR2= 177604 
UIPORS= 177606 
UIPDR&= 177610 
UIPDRS+* 177612 
UIPDR6= 177614 
UIPOR?7= 177616 


;*USER "D" PAGE DESCRIPTOR REGISTORS 


OPDRO= 177620 
UDPOR1L= 177622 
JDPORE= 177624 
UDPDRS- 177626 


SEQ 0007 


| | 
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300 177630 UDPDR4= 177630 
301 177632 UDPDRS= 177632 
302 177634 UDPDRE= 177634 
sos 177636 UDPDR7= 177636 
os ;@USER “I” PAGE PODRESS REGISTERS 
307 177640 UIPARO= 177640 
308 177642 UIPARL= 177642 
309 1776438 UIPAR2= 177644 
310 177646 UIPAR3= 177646 
Sil 177650 UIPAR4= 177650 
312 177652 UIPARS= 177652 
313 177654 UIPAR6= 177654 
tet 177656 UIPAR7= 177656 
2 ;*USER “D” PAGE ADDRESS REGISTERS 
17 
318 177660 UDPARO= 177660 
319 177662 UDPAR1L= 177662 
320 177664 UDPAR2= 177664 
321 177666 UDPAR3= 177666 
322 177670 UDPAR4= 177670 
323 177672 UDPARS= 177672 
324 177674 UDPAR6= 177674 
— 177676 UDPAR7= 177676 
. ;@SUPERVISOR “I” PAGE DESCRIPTOR REGISTERS 
329 172200 SIPDRO= 172200 
330 172202 SIPORL= 172202 
331 172204 SIPOR2= 172204 
332 172206 SIPOR3= 172206 
333 172210 SIPOR4= 172210 
334 172212 SIPORS= 172212 
335 172214 SIPOR6= 172214 
244 172216 SIPDR7= 172216 
co ;¢SUPERVISOR “D” PAGE DESCRIPTOR REGISTERS 
340 172220 " SDPORO= 172220 
341 172222 SOPDR1i= 172222 
342 172224 SDPDR2= 172224 
343 172226 SOPOR3= 172226 
344 172230 SDPDR4= 172230 
345 172232 SDPORS= 172232 
346, 172234 SDPDR6= 172234 
od 172236 SDPDR7= 172236 
oy ;¢SUPERVISOR “I” PAGE ADDRESS REGISTERS 
351 172240 SIPARO= 172240 
252 172242 SIPAR1= 172242 
453 172244 SIPAR2Z= 172244 
54 172246 SIPAR3= 172246 


355 172250 SIPARS= 172250 
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172252 
172254 
172256 


172260 
172262 
172264 
17<c266 
172270 
172272 
172274 
172276 


172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 


172320 
172322 
172324 
172326 
172330 
172332 
172334 
172336 


172340 
172342 
172344 
172346 
172350 
172352 
172354 
172356 


172360 
172362 
172364 
172366 
172370 
172372 


J] 
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SIPARS= 172252 
SIPAR6= 172254 
SIPAR?= 172256 


s*SUPERVISOR "D” PAGE ADDRESS REGISTERS 


SDPARO= 172260 
SDOPAR1= 172262 
SDPAR2= 172264 
SDPARS= 172266 
SDPAR4= 172270 
SDPARS= 172272 
SDPAR6= 172274 . 
SOPAR7= 172276 


s*KERNEL “I” PAGE DESCRIPTOR REGISTERS 


KIPORO= 172300 
KIPOR1= 172302 
KIPDRe= 172304 
KIPOR3S= 172306 
KIPDR4= 172310 
KIPORS= 172312 
KIPOR6= 172314 
kaPDR7= 172316 


s*KERNEL “D’ PAGE DESCRIPTOR REGISTERS 


KDPDRO= 172320 
KDPDR1= 172322 
KDPDR2= 172324 
KDPDR3= 172326 
KDPDR4= 172330 
KDPDRS= 172332 
KDPDR6= 172334 
KDPDR7= 172336 


s@KERNEL “I” PAGE ADDRESS REGISTERS 


KIPARO= 172340 
KIPARL= 172342 
KIPAR2= 172344 
KIPAR3= 172346 
KIPAR4= 172350 
KIPARS= 172352 
KIPAR6= 172354 
KIPAR7= 172356 


seKERNEL “D" PAGE ADDRESS REGISTERS 


KDPARO= 172360 
KDPAR1= 172362 
KDPAR2= 172364 
KDPARS= 172366 
KDPARG= 172370 
KDPARS= 172372 


SEQ 9009 
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MEMORY MANAGEMENT DEFINITIONS 
KDPAR6= 172374 
KDPAR7= 172376 
-SBTTL BASIC DEFINITIONS 


;*INITIAL ADDRESS OF THE STACK POINTER ### 1100 e+ 
STACK= 1100 


ERROR= EMT 3:BASIC DEFINITION OF ERROR CALL 
SCOPE= IOT ;;BASIC DEFINITION OF SCOPE CALL 
;*MISCELLANEOUS DEFINITIONS 

HT= 11 3;CODE FOR HORIZONTAL TAB 

LF = 12 3;CODE FOR LINE FEED 

CR= 15 3;CODE FOR CARRIAGE RETURN 

CRLF = 200 ;;CODE FOR CARRIAGE RETURN-LINE FEED 
PS: 177776 3sPROCESSOR STATUS WORD 


PSW= PS 

STKLMT= 177774 
PIRQG= 177772 
OSWR = 177570 
DOISP= 177570 


3;STACK LIMIT REGISTER 

3;PROGRAM INTERRUPT REQUEST REGISTER 
+ sHARDWARE SWITCH REGISTER 

; sHARDWARE DISPLAY REGISTER 


a REGISTER DEFINITIONS 


RO= 3 ;GENERAL REGISTER 
R1= #1 3 ;GENERAL REGISTER 
Re= #2 ;;GENERAL REGISTER 
R3= 3 3 ;GENERAL REGISTER 
R4: “4 3 ;GENERAL REGISTER 
RS= “5 ;;GENERAL REGISTER 
R6= 66 ;;GENERAL REGISTER 
R7= 67 ;;GENERAL REGISTER 
SP = 6 3;STACK POINTER 
PC: “7 : PROGRAM COUNTER 
;*PRIORITY LEVEL DEFINITIONS 

PRO= 0 ssPRIORITY LEVEL O 
PR1= 40 s;PRIORITY LEVEL 1 
PR2= 100 s;PRIORITY LEVEL 2 
PR3- 140 :;PRIORITY LEVEL 3 
PR4- 200 :;PRIORITY LEVEL 4 
PRS= 240 s;sPRIORITY LEVEL 5 
PR6= 300 s;PRIORITY LEVEL 6 
PR7= 340 ssPRIORITY LEVEL 7 
3¢"SWITCH REGISTER’ SwITCH DEFINITIONS 
SwiS= 100000 

SW1i4= 40000 

SW13= 20000 

SW12- 10000 

SWil- 4000 

SwW10- 2000 

SwO9- 1000 

SwO08 = 400 

5WO7 > 200 

SWOF, - 100 


5WOS » 


40 


SEQ 9010 
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BASIC DEFINITIONS 


Swo4: 20 
SwO3= 10 
SwWOe = 8 
SwWOl- 2 
SWOO = 1 
SW9= SwWO9 
SW8 = Swos 
SW7= SWO7 
SW6= SWO6 
SWS = Swos 
SW4 = Swo4 
SW3= Swos 
SW2= SWO02 
SW1= Swol 
Swo= SWOO 


;*DATA BIT DEFINITIONS (BITOO TO BIT1LS) 
100000 


BIT15= 

BIT14= 40000 
BIT13= 20000 
BIT1i2= 10000 
BITil= 4000 
BIT10= 2000 
BITO9= 1000 
BITO8= 400 
BITO7= 200 
BITO6= 100 


s*BASIC "CPU" TRAP VECTOR ADDRESSES 


ERRVEC: 4 

RESVEC= 10 
TBITVEC=14 
TRIVEC= 14 
BPTVEC= 14 
IOTVEC= 20 
PWRVEC= 24 
EMTVEC= 30 
TRAPVEC = 34 
TKVEC= 60 
TPVEC: 64 


33; TIME OUT AND OTHER ERRORS 
;sRESERVED AND ILLEGAL INSTRUCTIONS 
33°" BIT 

3: TRACE TRAP 

3 ;BREAKPOINT TRAP (BPTI) 

33 INPUT/OUTPUT TRAP (IOT) eeSCOPEee 
ssPOWER FAIL 

;sEMULATOR TRAP (EMT) eeERRORes 

33° TRAP” TRAP 

331Ty KETBOARD VECTOR 

s:1Ty PRINTER VECTOR 


SEQ 9011 
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000174 
000176 


000200 
000204 


000220 
000226 


000052 


000024 
000044 
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000240 
000001 


001160 
003764 


000777 
003764 


001160 


M1 
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BASIC DEFINITIONS SEQ 0012 
PIRQVEC=240 ;sPROGRAM INTERRUPT REQUEST VECTOR 
UFDSE T= 1 ;FLAG FOR UFD 
.SBTTL TRAP CATCHER 
20 
;*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A “.+2,HALT” 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
; “LOCATION 9 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
2174 
DISPREG: .WwORD 0 ;:;SOFTWARE DISPLAY REGISTER 
SUREG: “WORD 0 ;;SOFTWARE SWITCH REGISTER 
: CLR $TMPO 
JMP @esSTART 
. =220 
MOV 9777, $TMPO 
UMP @eSTART 
.SBTTL ACT11 HOOKS 
FF SSSOAHASSEHSESAHSESHEEHESEHESEEEEEESEEHEESEAEEHEEESEEEHEHTEEHSEEHECEHEE 
;HOOKS REQUIRED BY ACT11 
$SVPC=, ;SAVE PC 
. 246 
HENDAD ::1)SET LOC.46 TO ADDRESS OF SENDAD IN .$EOP 
“WORD O +32)SET LOC.52 TO ZERO 
_ =$SVPC 3: RESTORE PC 
_SBTTL APT PARAMETER BLOCK 
3 J SSSHASSHSHESSESESEESASSESSEEHESESESEEEHEHEEESHEEEESEEEEEHEEEEEEEEELES 
;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
FF FSSSSEHESESEHEHESESEEESEAHESHESEEEEHEHEEESCEEOEESD CHES EHEEHEEBEAELE 
.$X=,  3;SAVE CURRENT LOCATION 
"224 :3SET POWER FAIL TO POINT TO START OF PROGRAM 
200 33FOR APT START UP 
244 ;;POINT TO APT INDIRECT ADDRESS PNIR. 
$APTHDR ;;POINT TO APT HEADER BLOCK 
.*.$X | ;3RESET LOCATION COUNTER 
FF SSSMAASHHEASSHEHESESEHSEESHESEEHEEHEEHEEEHEEEEHEEEOEEHEHEEESHEOEHHSESAEEEOE 
;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
; INTERFACE SPEC. 
SAPTHD: 
$SHIBTS: .WORD 0 ;:TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
$MBADR: .WORD $MAIL ;;ADDRESS OF APT MAILBOX (BITS 0-15) 
$TSTM: .WORD ;;RUN TIM OF LONGEST TEST 
$PASTM: |WORD ;;RUN ~°“© IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
SUNITM: .WORD ;;ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 


. WORD SETEND- SMAIL 72 ;;LENGTH MAILBOX -E TABLE( WORDS ) 
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.SBTTL COMMON TAGS 


FE PPSSSSSSSSHSHHESSESSSEEESEHEESESESEESEEEEEEEEEEEESEESEEESESEESEESEEOSD 


s*THIS TABLE CONTAINS 


;¢USED IN THE PROGRAM, 


.*1100 
SCMTAG: 
STSTNM: .BYTE 
SERFLG: .BYTE 
SICNT: .WORD 
$LPADR: .WwORD 
SLPERR: .WORD 
SERTTL: .WORD 
SITEMB: .BYTE 
SERMAX: .BYTE 
SERRPC: .WORD 
$GDADR: .WORD 
$BDADR: .WORD 
$GODAT: .wWwORD 
SBDDAT: .WORD 
. WORD 
. WORD 
SAUTOB: .BriTe 
SINTAG: .BYTE 
. JORD 
WR: . WORD 
DISPLAY: .WORC 
$TKS: 177560 
sTKB: 177562 
$TPS: 177564 
sTPB: 177566 
SNULL .BrTe 
SFILLS: .BYTE 
SFILLC: .BYTE 
STPFLG: .BrTTE 
sTMPO: .wORD 
sTMP1: .WwORD 
STIMES: O 
SESCAPE :0 
SBELL: .ASCIZ 
$QUES: .ASCII 
sCRLF ASCII 
$_F;: -ASCIZ 


oeooooooooorooocoocso 


83 
a8 


«207 >< S77 oe SPT > 
4377 

«15> 

«12> 


:3START OF 


3; CONTAINS 
3 ;CONTAINS 
3; ;CONTAINS 
: ;CONTAINS 
3; ; CONTAINS 
3 ;CONTAINS 
3; ;CONTAINS 
3; CONTAINS 
3 ;CONTAINS 
3 ;CONTAINS 
3: ; CONTAINS 
3; ;CONTAINS 
3 sCONTATNS 


; sRESERVED - 


JARTOUS COMMON STORAGE LOCATIONS 


COMMON TAGS 


THE TEST NUMBER 

ERROR FLAG 

SUBTEST ITERATION COUNT 
SCOPE LOOP ADDRESS 

SCOPE RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 

MAX. ERRORS PER TEST 

PC OF LAST ERROR INSTRUCTION 
ADDRESS OF ‘GOOD’ DATA 
ADDRESS OF ‘BAD’ DATA 
‘GOOD’ DATA 

‘BAD’ DATA 

-NOT TO BE USED 


+ AUTOMATIC MODE INDICATOR 
i: INTERRUPT MODE INDICATOR 


ssADDRESS OF SWITCH REGISTER 


+ ;ADORESS OF 


DISPLAY REGISTER 


33TTy KBD STATUS 
z3;TTy KBD BUFFER 


331Ty PRINTER STATUS REG. 
;;TTY PRINTER BUFFER REG. 


3 sCONTAINS 


;;CONTAINS @ 


ADORE SS 

ADORE SS 

NULL CHARACTER FOR FILLS 

OF FILLER CHARACTERS REQUIRED 


ss INSERT FILL CHARS. AFTER A “LINE FEED” 

33 TERMINAL AVAILABLE” FLAG (BIT<O7>*O0<vES) 
+sUSER DEFINED 

3sUSER DEFINED 


33MAX. 


NUMBER OF ITERATIONS 


3 ;ESCAPE ON ERROR ADDRESS 
;;CODE FOR BELL 
; ;QUESTION MARK 


3; ; CARRIAGE 


ssLIN€ FEED 


RE TURN 


FE SSSSSSSSHESSHESSHESESESESESESESESESSEEESESEEEESESESESESESEEEEESEEOEOE 


APT MAIL BOx ETABLE 


BE SSSSSSESSESSSSESEHSEEEHESEHEESSSESSESOSEOSHSEEHEEHEEEEHEEEEEEESEEOCEEES 


. SBTTL 
-EVEN 
SMAIL: 
sMSGTr: .WORD 
SFATAL: .WORD 
STESTN: .WORD 
$PASS: .WORD 
sDEVCT: WORD 


;3APT MAILBOX 


SGT ;;MESSAGE TrPE CODE 
s3FATAL ERROR NUMBER 
33 TEST NUMBER 
33PASS COUNT 

ssDEVICE COUNT 


AF ATAL 
ATESTN 
APASS 

ADE vCT 


SEQ 0013 
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COKDAB.P11 O05 -APR-84 16:45 APT MAILBOX -E TABLE SEQ 0014 
©30 OO1L212 000000 SUNIT: .WORD AUNIT 33170 UNIT NUMBER 
631 001214 000000 SMSGAD: .WORD AMSGAD 4;MESSAGE ADDRESS 
632 001216 000000 $MSGLG: .WORD AMSGLG ;,;MESSAGE LENGTH 
©335 001220 SE TABLE: ssAPT ENVIRONMENT TABLE 
634 001220 000 SENV: -BYTE AENV ssENVIRONMENT BYTE 
©35 OOl221 000 SENVM: .BYTE  AENVM ssENVIRONMENT MODE BITS 
©3¢ 001222 000000 $SWREG: .WORD ASWREG ;;APT SWITCH REGISTER 
©37 001224 000000 SUSWR: .WORD AUSWR ssUSER SWITCHES 
©%8 DWlLL26 000000 sCPUOP: .WORD ACPUOP ;;CPU TYPE,OPTIONS 
039 36 BITS 15-11*CPU TYPE 
640 3° 11/04*01,11705*02,11/20°05,11/40704,11/45-05 
o41 36 11/70*06,P0Q*07,Q*10 
e4c 36 BIT 10°REAL TIME CLOCK 
045 i¢ BIT 9*FLOATING POINT PROCESSOR 
644 i¢ BIT 8&=MEMORY MANAGEMENT 
e845 0012380 000 $SMAMS1: .BYTE AMAMS1 ;:;HIGH ADORESS,.M.S. BrTE 
646 001231 000 SMTYP1L: BYTE AMTYP1 3;MEM, TYPE, ,BLKO1 
04° 3° MEM. TYPE BYTE -- (HIGH Brie) 
648 36 900 NSEC CORE -001 
649 36 300 NSEC BIPOLAR=002 
650 s¢ 500 NSEC M0S-003 
651 001232 00000 $MADR1: .WORD AMADR1 ;;HIGH ADORESS,BLKO1 
652 3° MEM.LAST ADOR.*3 BYTES, THIS WORD AND LOW OF “TYPE ABOVE 
653 001234 000 $SMAMS2: .BYTE AMAMS2 ;;HIGH ADORESS,M.S. BrTt 
654 001235 000 SMTYP2: .BYTE AMTYP2 ;;MEM. TYPE .BLKO2 
655 001236 000000 $MADR2: .WORD AMADR2 ;;MEM.LAST ADORESS,BLKeO2 
656 001240 000 SMAMS?: .BYTE AMAMS3S ;;HIGH ADDRESS,M.S.BYrTE 
657 001241 000 SMTYP3: .BYTE AMTYPS 3;;MEM, TYPE,BLKO3 
658 001242 000000 $MADR3: .WORD AMADRS ;;MEM.LAST ADDRESS,BLKOS 
659 001244 000 $MAMS4: .BYTE AMAMS4 ;;HIGH ADDRESS,M.S.BYTE 
660 001245 000 SMTYP4: .BYTE AMTYP4 5; ;MEM, TYPE,BLKOG 
661 001246 000000 SMADR4: .WORD AMADRS4 3 ;MEM.LAST ADDRESS,BLKO4 
662 001250 000000 $VECT1: .WORD AVECTL ;; INTERRUPT VECTORO1.BUS PRIORIT1O1 
663 001252 000000 $VECT2:; .WORD AVECT2 ;; INTERRUPT VECTOR@2BUS PRIORIT102 
664 001254 000000 $BASE: .WORD ABASE - sBASE ADDRESS OF EQUIF'IENT UNDER TEST 
665 001256 000000 sDEVM: .WORD ADEVM ssOEVICE MAP 
666 001260 000000 sCOW1: .WORD ACOW1 ssCONTROLLER DESCRIPTION WORDOL 
667 001262 000000 sCOW2: .WORD ACOW2 + sCONTROLLER DESCRIPTION WORDO2 
668 001264 000000 s00WO: .WORD ADODWO s3;sDEVICE DESCRIPTOR wORDOO 
669 001266 000000 $00W1: .WORD ADOW1 ssDEVICE DESCRIPTOR WORDO1 
670 001270 000000 s00W2: .WORD ADOW2 ssDEVICE DESCRIPTOR WORDO2 
671 001272 000000 $00W3: .WORD ADODWS ssDEVICE DESCRIPTOR WORDOS 
672 001274 000000 s00W4;: .WORD ADODW4 ssDEVICE DESCRIPTOR WORDOS 
673 001276 000000 s00WS: .WORD ADOWS ssDEVICE DESCRIPTOR WORDOS 
674 001300 000000 $00W6: .WORD ADDW6 ssDEVICE DESCRIPTOR WORDO6 
675 001302 000000 s00W7; .WORD ADOW? ssDEVICE DESCRIPTOR WORDO? 
676 001304 000000 sD0W8: .WORD ADDWS ssDEVICE DESCRIPTOR WORDOS 
677 001306 000000 s00W9;: .WORD ADOW9 ssDEVICE DESCRIPTOR WORDOD 
678 001310 000000 $00W10: .WORD ADOW1O ;;DEVICE DESCRIPTOR WORDOLO 
679 001312 000000 $DDW11: .WORD ADOW11 ;,;DEVICE DESCRIPTOR WORDO11 
680 001314 000000 sODWle: .WwORD ADDWL2 4,DEVICE DESCRIPTOR WORDO1.: 
681 001316 000000 $O0W13; .WwORD ADOWLS ;;DEVICE DESCRIPTOR WORDOLS 
682 001320 000000 $D0W14;: .WORD ADDWI4 ;;DEVICE DESCRIPTOR WORDOL4 
64% 001322 000000 $D0W1S; .WORD ADDWIS ,,0b VICE DESCRIPTOR WORDALS 


C2 


ad 
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001224 


001332 


001334 
001336 
001340 
001342 


001344 


001414 
001416 


OS -APR-84 16:45 


122674 
130405 
131436 
000000 


122734 
130472 
131450 
000000 


122767 
123032 


130571 
131464 
000000 


123066 
130571 


05 - APR -84 


. SBTTL 


s*LOCATION $ITEMB. 


3 «NOTE 


1: 


3: *NOTE2: 


SERRTB;: 


.SBTTL 
3; ITEM 


; ITEM 


; ITEM 


3; ITEM 


; ITEM 


; ITEM 


s ITEM 


3; ITEM 


1 


De 


6:45 PAGE 17 
ERROR POINTER f 


ERROR POINTER TABLE 


3¢THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
3*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 


THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT. 
IF $ITEMB IS O THE ONLY PERTINENT DATA IS ( SERRPC). 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


+sPOINTS TO THE ERROR MESSAGE 
;sPOINTS TO THE DATA HEADER 
s3sPOINTS TO THE DATA 

3sPOINTS 10 THE DATA FORMAT 


ERROR DEFINITIONS 


;CPU ERROR 
3TEST #@, ERROR PC 
3$TMP1, SERRPC 


sMMU ERROR 
sTEST @, ERROR PC 
3$TMP1, SERRPC 


;FPP ERROR 
sTEST @, ERROR PC 
3 $TMP1, SERRPC 


sERROR IN READ WRITE SITS OF CCR 
sTEST &, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC,.R1,CCR 


sFORCE MISS WRITES TO CACHE 
sTEST ®, PC, MIT/MISS, DATA IN CACHE, DATA IN MEMORY 
3$TMP1,SERRPC, R2, R1, $GDDAT 


sFORCE MISS WRITE INVALIDATES CACHE 
sTEST @, PC, MIT/MISS, DATA IN CACHE, DATA IN MEMORY 
3$TMP1,SERRPC, R2, R1, $GODAT 


sUNEXPECTED PARITY INTERRUPT 
;TEST @, PC, ADDRESS ACCESSED, MSER 
3 $TMP1, SERRPC, $BDADR,MSER 


3TAG PARIT? ERROR 
sTEST @, PC, ADDRESS ACCESSED, MSER 


SEQ 0016 
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001420 
001422 


001424 
001426 
001430 
001432 


001434 
001436 
001440 
001442 


001444 
001446 
001450 
001452 


001454 
001456 
001460 
001462 


001464 
001466 
001470 
001472 


001550 


OS - APR -84 
131464 
000000 


123107 
130572 
131464 
000000 


123131 
130571 
131464 
000000 


123157 
130571 
131464 
000000 


123206 
130405 
131476 
000000 


123231 
130472 
131450 
000000 


123265 
130472 
131450 
000000 


123332 
130405 
131510 
000000 


123376 
130360 
131430 
000000 


123431 
130360 
131430 
000000 


123474 
130360 
131430 
000000 


123533 
130472 
131450 


16:45 
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; ITEM 


; ITEM 


; ITEM 


3; ITEM 


; ITEM 


; ITEM 


s ITEM 


; ITEM 


; ITEM 


sI TEM 2 


sITEM 


16;45 


ERROR DEFINITIONS 


E2 
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3 $TMP1, SERRPC, $BDADR ,.MSER 


sDATA PARITY ERROR 
sTEST #, PC, ADDRESS ACCESSED, MSER 
1 $TMP1, SERRPC, $BDADR ,MSER 


LOW BYTE PARITY ERROR 
;TEST #, PC, ADDRESS ACCESSED, MSER 
3 $TMP1, SERRPC, $BDADR ,MSER 


;HIGH BYTE PARITY ERROR 
sTEST #, PC, ADDRESS ACCESSED, MSER 
;$TMP1, SERRPC, $BDADR,MSER 


sERROR DATA PATH 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC, $GODAT, TSTLOC 


sFORCE MISS READS FROM CACHE 
sTEST @, PC, HIT/MISS, DATA IN CACHE, DATA IN MEMORY 
3$TMP1,SERRPC, R2, R1, SGODAT 


sFORCE MISS READS FROM CACHE AND MISS 
sTEST @, PC, HIT/MISS, DATA IN CACHE, DATA IN MEMORY 
;$TMP1,SERRPC, R2, R1, $GDDAT 


sERROR IN RECORDING HITS IN HIT/MISS 
sTEST &, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC, $GODAT ,RECDAT 


sWRITE BYTE ALLOCATES CACHE 
sTEST @, PC 
3 $TMP1, SERRPC 


sWRITE BYTE HIT DOES NOT RECORD HIT 
sTEST @, PC 
3$TMP1, SERRPC 


sBYTES REVERSED ON WRITE CYCLES 
sTEST @, PC 
3 $TMP1, SERRPC 


sCONDITLIONAL BYPASS DOESN'T INVALIDATE CACHE 
sTEST @, PC, MIT/MISS, DATA IN CACHE, DATA IN MEMOR: 
3$TMP1L,SERRPC, RO, R1, S$GDDAT 


SEQ 0017 


Fe 
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COKDAB.P11 OS-APR-84 16:45 ERROR DEFINITIONS SEQ 0018 
800 001552 000000 Oo 
801 s ITEM 24 4 
802 001554 123607 EM24 sHITS RECORDED AFTER FLUSHING CACHE 
803 001556 130644 DH24 sTEST #, PC, NUMBER OF HITS 
804 001560 131522 DT24 3 $TMP1, SERRPC RS 
805 001562 00000u0 te) 
806 ; ITEM 25 
807 O01504 123652 EM25 sBYPASS DOESN'T INVALIDATE CACHE 
808 01566 130360 OH1 sTEST @, PC 
809 001570 131430 OT1 3 $TMP1, SERRPC 
810 001572 000000 0 
811 s ITEM 26 
812 00157 123712 EM26 sMSER DOES NOT CLEAR ON WRITE REFERENCE 
813 001576 130360 OH1 sTEST @, PC 
814 001600 131430 OT1 - 3 $TMP1, SERRPC 
815 001602 000000 .¢) 
816 ;ITEM 27 
817 001604 123761 EM27 sPARITY ERROR DON'T CAUSE A MISS 
818 001606 130710 DH27 sTEST @, PC, MSER, HIT/MISS 
819 001610 131532 OT27 3 $TMP1, SERRPC ,MSER,R3,0 
820 001612 000000 .¢) 
821 ;ITEM 30 
822 001614 124021 EM30 sPARITY ERROR DON’T SET MSER WITH CCR<7>=0 
823 001616 130710 DH27 ;TEST ®, PC, MSER, HIT/MISS 
824 001620 131532 OT27 3$TMP1, SERRPC,.MSER,R3,0 
825 001622 000000 .¢) 
826 ;ITEM 31 
827 001624 124073 EM31 sPARITY ERROR IGNORED 
826 001626 130360 DH1 sTEST #, PC 
829 001630 131430 OT1 3 $TMP1, SERRPC 
830 001632 000000 fe) 
831 sITEM 32 
832 001634 124120 EM32 sPARITY ERROR IGNORED ON LOW BrTE 
833 001636 130360 OH1 sTEST #, PC 
834 001640 131430 DT1 ;$TMP1, SERRPC 
835 001642 000000 ie) 
836 sITEM 33 
837 001644 124161 EM35 sPARITY ERROR IGNORED ON HIGm BYTE 
838 001646 130360 OH1 sTEST @, PC 
839 001650 131430 OT1 3 $TMP1, SERRPC 
840 001652 000000 .e) 
841 ;ITEM 34 
842 001654 124223 EM34 sPARITY ABORT LOGIC DOESN’! WORK 
843 001656 130360 OH1 ;TEST @, PC 
844 001660 131430 OT1 3 $TMP1, SERRPC 
845 001662 000000 te) 
846 sITEM 35 
847 001664 124263 EM35 sMSER NOT SET PROPERLY 
848 001666 130405 DH4 sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
B49 001670 131544 DT35 3; $TMP1, SERRPC, SGDDAT ,MSER,O 
850 001672 000000 e) 
851 sITEM 36 
8S2 001674 124311 EM36 sPARITY INTERRUPT DOESN'T WORK 
853 001676 130360 OH1 sTEST @, PC 
854 001700 131430 OT1 3 $TMP1, SERRPC 


55 001702 000000 .¢) 
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001704 
001706 
001710 
001712 


001714 
001716 
001720 
001722 


001724 
001726 
001730 
001732 


001734 
001736 
001740 
001742 


001744 
001746 
001750 
001752 


001754 
001756 
001760 
001762 


001764 
001766 
001770 
001772 


001774 
001776 
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124355 
130360 
131430 
000000 


124417 
130360 
131430 
000000 


124464 
130753 
131556 
000000 


124550 
130360 
131430 
000000 


124576 
131024 
131566 
000000 


124627 
120360 
131430 
000000 


124667 
130360 
131430 
000000 


124751 
131124 
131602 
000000 


125041 
131124 
131602 
000000 


125126 
131124 
131614 
000000 


125151 
130405 
131626 
000000 


16:45 


O5S-APR-84 16:45 
ERROR DEF INTTIONS 


;ITEM 37 


; ITEM 40 


; ITEM 41 


; ITEM 42 


sITEM 43 


s ITEM 44 


;ITEM 45 


;ITEM 46 


sITEM 47 


; ITEM 50 


; ITEM 51 


sITEM Se 


Ge 
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sNXM AND PARITY ABORT DIN’ T HAPPEN 
sTEST @, PC 
3 $TMP1, SERRPC 


sPARITY ABORT NOT BLOCKED Br NXM TRAP 
sTEST @, PC 
3 $TMP1, SERRPC 


sMULTI-PROCESSOR HOOK ages «ae DOESN'T CAUSE MISS 
sTEST @, PC, INSTRUCTION OPCOD 
;$TMP1, SERRPC, sBDDAT 


sERROR IN PARITY LOGIC 
;TEST @, PC 
3 $TMP1, SERRPC 


sERROR IN CACHE DATA RAMS 
sTEST @, PC, EXPECTED DATA, RECEIVED DATA, CACHE LOCATION 
3 $TMP1, SERRPC,R1,RECDAT, $BDADR 


sERROR IN NXM IN STANDALONE MODE 
sTEST @, 
3 $TMP1, SERRPC 


sHITS NOT RECORDED PROPERL? THRU HIT/MISS 
,TEST ©, PC 
3 $TMP1, SERRPC 


sHIT RECORDED FOR A LOCATION NOT IN CACHE 
;TEST #, PC, LOCATION ACCESSED 
3; $TMP1, SERRPC ,KIPAR6, $BDADR 


sMISS RECORDED FOR A LOCATION THAT SHOULD BE IN CACHE 
sTEST #, PC, LOCATION ACCESSED 
3 $TMP1, SERRPC ,KIPAR6, $BDADR 


sERROR IN TAG STORE 
sTEST @, PC, ADDRESS 
3; $TMP1, SERRPC,R1, $BDADR 


sERROR PCR READ-wWRITE BITS 
sTEST #, PC, EXPECTED DATA, RECEIVED DATA 
3$TMP1, $ERRPC, $GDDAT,PCR 


SEQ 9019 
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91e 
913 


002034 
002036 
002040 

2042 


002044 
002046 
002050 
002052 


002164 


05 -APR-84 1 


125203 
130405 
131640 
000000 


125241 
130360 
131430 
000000 


125275 
130360 
131430 
000000 


125333 
130360 
131430 
000000 


125367 
130360 
131430 
000000 


125413 


130360 
131430 
000000 


125445 
130360 
131430 
000000 


125513 


125703 


OS - APR -84 


; 1TEM 


; ITEM 


; ITEM 


3; ITEM 


; ITEM 


; ITEM 


; ITEM 


3; ITEM 


; ITEM 


3; ITEM 


; ITEM 


16;45 
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.sERROR IN BCSR READ-WRITE BITS 


sTEST #, PC, EXPECTED DATA, RECEIVED DATA 
;$TMP1, SERROC, $GODAT,BCSR 


sRESET DOESN'T CLEAR BCSR<4> 
sTEST @, PC 
3 $TMP1, SERRPC 


sCHECKSUM ERROR IN 16-BIT ROM 
sTEST @, PC 
3 $TMP1, SERRPC 


sCHCKSUM ERROR IN 8-BIT ROM 
sTEST @, PC 
3 $TMP1, SERRPC 


s TIMEOUT READING LKS 
sTEST #, PC 
;$TMP1, SERRPC 


3LKS<O7> DOES NOT BECOME 1 
sTEST #, PC 
3 $TMP1, SERRPC 


sWRITE REFERENCE DOESN’ T CLEAR LKS<07> 
sTEST #, PC 
3 $TMP1, SERRPC 


sILLEGAL LKS INTERRUPTS 
s;TEST #, PC 
:$TMP1, SERRPC 


sPROCESSOR INTERRUPTS DON’T CLEAR LKS<O7> 
sTEST &, PC 
3 $TMP1, SERRPC 


3LKS READY DOESN’ T GO LOW 
sTEST @, PC 
3 $TMP1, SERRPC 


;WRONG NUMBER OF LKS INTERRUPTS 
sTEST ®&, PC 
3 $TMP1, SERRPC 


3LKS INTERRUPTS HAPPEN AT WRONG PRIORITY 


SEQ 0020 


le 
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COKDAB.P11 05 -APR-84 16:45 ERROR DEFINITIONS SEQ 0021 
968 002166 131211 DH65 sTEST @, PC, PRIORITY 
962 002170 131664 DT65 3$TMP1, SERRPC, $GODAT 
970 002172 000000 te) 
971 ; ITEM 66 
972 002174 125753 EM66 sBCSR<12> DOES NOT DISABLES LKS 
973 002176 130360 DH1 sTEST #, PC 
974 002200 131430 OT1 3 $TMP1, SERRPC 
975 002202 000000 0 
976 ; ITEM 67 
977 002204 126012 EM67 sBCSR<13> DOESN'T SET LKS<06> 
$78 002206 150360 OH1 ;TEST #, PC 
979 002210 131430 OT1 3 $TMP1, SERRPC 
980 002212 000000 te) 
981 ;ITEM 70 
982 002214 126047 EM70 sRESET DOESN'T SET LKS<7> 
983 002216 130360 OH1 sTEST #, PC 
984 002220 i31430 OT1 3 $TMP1, SERRPC 
985 002222 000000 0 
986 ;ITEM 71 
987 002224 126100 EM71 sRESET DOESN'T CLEAR LKS<06> 
988 002226 130360 OH1 sTEST #, PC 
989 002230 131430 OT1 3 $TMP1, SERRPC 
990 002232 000000 te) 
991 sITEM 72 
992 002234 126134 EM72 ;TIMEOUT READING SLU REGISTERS 
993 002236 131255 DH72 sTEST &, PC, ADDRESS FAILED 
994 002240 131556 OT41 3$TMP1, SERRPC, $BODAT 
995 002242 000000 .e) 
990 sITEM 73 
997 002244 126172 —M73 :XMIT READY DION’ T GO LOW 
998 002246 130360 OH1 sTEST @, PC 
999 002250 131430 OT1 3 $TMP1, SERRPC 
1000 002252 000000 0) 
1001 s ITEM 74 
1002 002254 126216 EM74 sRCSR DOESN’ T BECOME 1 
1003 002256 130360 OH1 sTEST #, P 
1004 002260 131430 OT1 3 $TMP1, SERRPC 
1005 002262 000000 0 
1006 sITEM 75 
1007 002204 126247 EM7S sWRONG CHARACTER RECEIVED 
1008 002266 130405 DH4 sTEST @, PC, EXPECTED DATA, RECEIVED DATA 
1009 002270 131674 OT75 3; $TMP1, SERRPC, $GDDAT, $BDDAT 
1010 002272 000000 te) 
1011 sITEM 76 
1012 002274 126300 EM76 sRCSR<O7> NOT CLEARED AFTER READING RBUF 
1013 002276 130360 DH1 sTEST #, PC 
1014 002300 131430 OT1 3 $TMP1, SERRPC 
1015 002302 000000 i?) 
1016 sITEM 77 
1017 002304 126350 EM77 sXCSR<O7> NOT SET ON RESET 
1018 002306 130360 DH1 sTEST @, PC 
1019 002310 131430 DT1 3; $TMP1, SERRPC 
1020 002312 000000 .¢) 
1021 sITEM 100 
1022 002314 126402 EM100 sRCSR<O7> NOT CLEARED ON RESET 


1023 002316 130360 On1 sTEST @, PC 
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1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
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131430 
000000 


126440 
130360 
131430 
000000 


126473 
130360 
131430 
000000 


126555 
130360 
131430 
000000 


126630 
130360 
131430 
000000 


126700 
131321 
131706 
000000 


126753 
131321 
131706 
000000 


127031 


127271 
131321 
131706 
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16:45 ERROR DEFINITIONS 


OT1 
te) 


; ITEM 101 


;ITEM 1 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


3; ITEM 


; ITEM 


; ITEM 


; ITEM 


Je 
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3 $TMP1, SERRPC 


3;SLU INTERRUPTS HAPPEN AT 4 
sTEST @, P 
3$TMP1, SERRPC 


sRESET DOES NOT CLEAR XCSR<6> AND RSCR<6> 
sTEST @, PC 
3 $TMP1, SERRPC 


; TRANSMIT INTERRUPT DOES NOT CLEAR XCSR<07> 
sTEST @, PC 
3 $TMP1, SERRPC 


sRECEIVE INTERRUPTS DON'T CLEAR RCSR<07> 
;TEST #, PC 
3 $TMP1, SERRPC 


sBREAK CONDITION DOES NOT SET RBUF PROPER. + 
;TEST &, PC, RBUF i. 
3 $TMP1, SERRPC ,RBUF 


sRBUF WASN'T CLEARED ON NEXT CHAR. 
sTEST @, PC, RBUF 
3; $TMP1, SERRPC ,RBUF 


sERROR IN WRITING TO XCSR<O> 
;TEST #, PC 
3 $TMP1, SERRPC 


sRESET DOES NOT CLEAR XCSR<00> 
sTEST @, PC 
3 $TMP1, SERRPC 


sFIRST CHARACTER WAS NOT OVERRUN BY THE SECOND 
sTEST #, PC, EXPECTED DATA, RECEIVED DATA 
3 $TMP1, SERRPC, $GODAT, $BDDAT 


sOVERRUN CONDITION DOES NOT SET PROPER BITS IN RBUF 
sTEST @, PC, RBUF 
;$TMP1, SERRPC ,RBUF 


sRBUF WAS NOT CLEARED ON THE NEXT CHARACTER 
sTEST @, PC, RBUF 
3$TMP1, SERRPC ,RBUF 


SEQ 0022 
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COKDAB.P11 0OS-APR-84 16:45 ERROR DEFINITIONS SEQ 0023 
1080 002452 000000 oO 
1081 ;ITEM 114 
1082 002454 127355 EM114 sERROR IN XCSR<2> 
1083 002456 130360 OH1 sTEST #, PC 
1084 002460 131430 OT1 3 $TMP1, SERRPC 
1085 002462 000000 i?) 
1086 ;ITEM 115 
1087 002464 127376 EM115 sERROR IN TAG STORE FROM STANDALONE MODE 
1088 002466 131353 DH115 oath sTEST #, PC, MSER, ADDRESS ACCESSED 
1089 002470 131716 OT115 3 $TMP1, SERRPC, SBDDAT ,KIPARG, $BDADR 
1090 2472 000000 t¢) 
1091 sITEM 116 
1092 002474 127446 EM116 sDMA TAG PARITY DOES NOT SET MSER<4> 
1093 002476 130360 OH1 sTEST @, PC 
1094 002500 131430 OT1 3 $TMP1, SERRPC 
1095 002502 000000 0) 
1096 sITEM 117 
1097 002504 127527 —M117 sMSER<13>NOT SET IN STANDALONE MODE 
1098 002506 130360 OH1 ;TEST #, PC 
1099 002510 131430 OT1 3 $TMP1, SERRPC 
1100 002512 000000 i?) 
1101 ;ITEM 120 
1102 002514 127572 EM120 ;DMA WRITE HITS DON'T INVALIDATE CACHE 
1103 002516 130360 OH1 ;TEST @, PC 
1104 002520 131430 OT1 3$TMP1, SERRPC 
1105 002522 000000 i?) 
1106 ; ITEM 121 
1107 002524 127640 EM121 ;IN BLOCK MODE ON WRITE OMA HITS NOT EVERrTHING IS INVALIDATED 
1106 002526 130360 DH1 ;TEST #, PC 
1109 002530 131430 OT1 3 $TMP1, SERRPC 
1110 002532 000000 0 
1111 sITEM 122 
1112 002534 127736 EM122 sREAD DMA HIT IS MESSED UP 
. 1113 002536 130360 OH1 sTEST #, PC 
1114 002540 131430 DT1 3 $TMP1, SERRPC 
1115 002542 000000 te) 
1116 ;ITEM 123 
1117 002544 127764 EM123 sERROR IN DMA CYCLES FROM Q22BE 
1118 002546 130360 OH1 sTEST #, PC 
1119 002550 131430 OTL 3 $TMP1, SERRPC 
2i20 002552 000000 ie) 
1lel ;ITEM 124 
+122 002554 130016 EM124 ;PIRQ INTERRUPTS DON’T TAKE PRIORITY OVER Q@ BUS INTERRUPTS 
1123 002556 130360 DH1 sTEST @, PC 
12°4 002560 131430 OT1 3 $TMP1, SERRPC 
1125 002562 000000 .¢) 
1126 ;ITEM 125 
1127 002564 130110 EM125 ;NO POWER DOWN TRAP TO 24 OCCUR 
1128 002566 130360 OH1 sTEST #, PC 
1129 002570 131430 DT1L 3 $TMP1, SERRPC 
1130 002572 000000 1?) 
1131 s ITEM 126 
1132 002574 130147 EM126 sERROR IN INTERRUPTS FROM Q22BE 
1133 002576 130360 OH1 sTEST #, PC 
1134 002600 131430 OT1 3 $TMP1, SERRPC 
1135 002602 000000 te) 
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1136 


1137 002604 
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130360 


000000 
002710 
000000 
000017 
000000 


L? 
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RROR DEFINITIONS 


sITEM 127 


DH1 
0T130 
oO 

; ITEM 131 
EM131 


OH1 
OT1 


0 
;ITEM 132 


sERROR IN PMG COUNTER 
sTEST @, PC 
3 $TMP1, SERRPC 


sUNEXPECTED TIMEOUT 
sTEST #, PC 
3 $TMP1, SERRPC 


sERROR WRITING TO LKS<6> 
sTEST @, PC 
3 $TMP1, SERRPC 


sMAINTENANCE REGISTER ERROR 
sTEST @, 
3 $TMP1, SERRPC 


-SBTTL GLOBAL VARIABLES AND REGISTER NAMES 
sREGISTERS FOR THE FIRST Q22BE 


CSR1: . WORD 


sREGISTERS FOR T 


CSR12: .WORD 


BA2 . WORD 
WCe: . WORD 
DATA2: .WORD 
VQBE2: .WORD 
VQPRe: WORD 


SAVPCR: D 

SAVBR: WORD 

.72710 

TEMP: . WORD 
.BLKW 


TIMOUT; .WORD 


1186 002752 000032 000012 000006 Q22EN: .WORD 
1187 002760 000002 


177524 
177524 


te) sCONTROL REGISTER 1 FOR Q22BE 
i?) sCONTROL/STATUS REGISTER 2 
.¢) sDMA ADDRESS FOR Q22BE 
te) sWORD COUNT REGISTER 
ce) sDMA DATA FOR Q22BE 
te) sADDRESS OF VECTOR FOR Q22BE 
te) sPRIORITY 
0 sSIMULTANEUOS GO ADDRESS REGISTER 
HE SECOND Q22BE 
te) sCONTROL REGISTER 1 FOR Q22BE 
i?) sCONTROL/STATUS REGISTER 2 
.¢) sDMA ADDRESS FOR Q22BE 
i?) sWORD COUNT REGISTER 
0) 30MA DATA FOR Q22BE 
i?) sADDRESS OF VECTOR FOR Q22BE 
ie) sPRIORITY 
10) 
: sACTUAL CHECKSUM 
0 
0 
> . sRESERVED FOR BLOCK MODE TRANSFER 
32,12,6.2 sPRIORITY 7-4 FOR Q22BE 
177524 sBOOT/DIAGNOSTICS CONF IGURAT ION 


177524 sBOOT/DIAGNOSTICS DISPLAY 


SEG 0024 
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177520 
177746 
177752 
177734 
177546 
177750 
177744 
177522 
177772 
177562 
177560 
177566 
177564 


177766 


177572 
177574 
177576 
172516 
120001 
000000 


CLUSTER MACY11 30( 1046) 
16:45 


Me 
O5-APR-84 16:45 PAGE 26 
GLOBAL VARIABLES AND REGISTER NAMES 


BCSR= 177520 sBOOT/DIAGNOSTICS STATUS 
CCR= 177746 sCACHE CONTROL REGISTER 
HITMIS= 177752 sHIT OR MISS REGISTER 

KMCR = 177734 sUNIBUS CONFIGURATION REGISTER 
LKS= 177546 sCLOCK STATUS REGISTER 
MAIREG= 177750 sMAINTENANCE REGISTER 

MSER= 177744 sMEMORY SYSTEM ERROR 

PCR= 177522 sPAGE CONTROL REGISTER 

PIR= 177772 sPROGRAM INTERRUPT REQUEST 
RBUF = 177562 sRECEIVER DATA BUFFER 

RCSR- 177560 sRECEIVER STATUS REGISTER 
XBUF = 177566 ; TRANSMITTER DATA BUFFER 
xCSR= 177564 s TRANSMITTER STATUS REGISTER 
CPEREG=- 177766 ;CPU ERROR REGISTER 
MMRO=SRO sMEMORY MANAGEMENT REG. O 
MMR1=SR1 sMEMORY MANAGEMENT REG. 1 
MMR2 =SR2 sMEMORY MANAGEMENT REG. 2 
MMR3=SR3 sMEMORY MANAGEMENT REG. 3 
POLY= 120001 

NULL = 


-SBTTL GLOBAL DATA SECTION 


see 

3; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
; IN MORE THAN ONE TEST. 

+s 


; THESE LOCATIONS ARE USED IN MORE THAN ONE TEST TO STORE VECTOR DATA 
;WHEN THE TEST NEEDS TO HAVE AN ERROR CONDITION RESPOND DIFFERENTLY 
3FROM THE DEFAULT RESPONCE. 

SLOCOO: .WORD 0 

SLOCO1: .WORD 0 


3 THESE ager ae ARE USED IN MORE THAN ONE TEST TO STORE WORKING DATA, 


LOWADD : 0 sSTORES LOW ADDRESS FOR RAM TESTS 

GOODAD: .WORD 0 sSTORES GOOD ADDRESS FOR RAM TESTS 
TSTADO: .WORD O sADDRESS STORE FOR RAM TESTS 

NEWADD: .WORD 0 sADDRESS STORE FOR RAM TEST 

FLAG: «WORD O ;USED TO STORE “FLAG” CONDITIONS 

SAVSUP: .WORD 0 sUSED TO STORE SUPERVISOR STACK VALUE 
SAVUSE: .WORD 0 sUSED TO STORE USER STACK VALUE 

SAVMRO: .WORD 0 sUSEO TO STORE MMU STATUS REGISTER O DATA 
SAVMR1: .WORD 0 sUSED TO STORE MMU STATUS REGISTER 1 DATA 
SAVMR2: .WORD 0 sUSED TO STORE MMU STATUS REGISTER ? DATA 
FLOAT: .BLKW 4 sUSED TO STORE VALUES FOR MMU TESTS 

FLO: -BLKW 4 sUSED TO STORE VALUES FOR MMU TESTS 

SEQ: -WORD O sSTORES SEQUENCE NUMBER FOR JUMP TESTS’ 
SPS: -WORD O sSTORES STACK POINTER FOR JUMP TESTS 
SPSJ: -WORD O sSTORES STACK POINTER FOR JUMP TESTS 
BIEXP; .BLKW 4 ;STORES EXPONENT DURING BIT TESTS 

BIRES: ,.BLKW 4 ;STORES RECIEVED DATA FOR BIT TESTS 
COUNT; .WORD 0 sERROR INDICATOR FOR FLOATING POINT TESTS 
RECFEC: .BLKW 4 sRECIEVED FLOATING POINT EXCEPTION CODE 


SEQ 0025 


COKDABO KDJ11-B C 
os 
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003072 
003102 


003112 
003114 


003116 
003120 


003122 
003124 


000004 
000004 


000000 


LUSTER MACY11 30(1046) O5-APR-84 16:4 
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GLOBAL DATA SECT 
RECST: .BLKW 
RECDST: .Bi.KW 


ALLCTR: .WORD 
LOOPIN: .WORD 


;SOME MORE TEMPORARY STORAGE FOR RAM TESTS 
19) sSTORES TEMPORARY BIT POSITIONS FOR RAM TESTS 
;STORES BIT MASK FOR ERROR ISOLATION 


. THE PROGRAM TEST LOCATION!!! !fiereeeeereees 
0 


SAVPOS: .WORD 
MASK; WORD 


sii!r:THIS Is IT 
TSTLOC: .WORD 
.BLKW 


20. 
;FPP REGISTER DEFINITIONS 


ACO= #0 
AC1= #1 
AC2= #2 
AC3= #3 
AC4= #4 
ACS= #5 
AC6= #6 
AC7= #7 


S PAGE 27 
TON 

4 

4 


6 


0 


Ne 


;FPP INTERRUPT VECTOR 


FPVEC=24 


STBOT= 


ry 


1000 


sRECIEVED FLOATING POINT STATUS 
sDESTINATION ADDRESS FOR FLOATING POINT TESTS 


; THESE wor pte ne USED BY MORE THAN ONE TEST AS LOOP COUNTERS 


SEQ 0026 
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COKDAB.P 11 05-APR-84 16:45 GLOBAL DATA SECTION SEQ 0027 
1804 003254 000000 TABG: ~—s 0 
i305 003256 000000 .WORD 0 
1306 003260 000000 .WORD 0 
1307 003262 000000 .WORD 0 
1308 003264 047050 TAB6A: .WORD 47050 
1309 003266 010000 .WORD 10000 
1310 003270 000000 .WORD 0 
1311 003272 000000 .WORD 0 
1312 003274 000200 TAB7:  .WORD 200 
1313 003276 000000 .WORD 0 
1314 003300 000000 .WORD 0 
1315 003302 000000 .WORD 0 
1316 003304 000200 TABB: .WORD 200 
1317 003306 000000 .WORD 0 
1318 003310 000000 wORD O 


. 1 
1320 003314 000400 0000CO 000000 TABS: -WORD 400,0,0,0 


1322 003324 030000 TAB1O: .WORD 30000 

1323 003326 003000 -WORD 3000 

1324 003330 «WORD O 

1325 003332 000000 -WORD O 

1326 003334 016400 TAB11: .WORD 16400 

1327 003336 000000 -WORD O 

1328 003340 000000 -WORD 0O 

1329 003542 000000 -WORD O 

1330 003344 030000 003000 000002 TAB1LIA: .WORD 30000, 3000,2,0 
1331 003352 000000 

1332 003354 016100 000000 000000 TAB12: .WORD 16100,0,0,1 
1333 005362 000001 

1334 003364 016200 TAB13: .WORD 16200 

1335 003366 000000 -WORD O 

1336 003370 000000 -WORD O 


1 
30000, 3000,0, 140000 


i 


1338 003374 030000 003000 000000 1AB13B 


1340 003404 030000 TAB14; .WORD 30000 
1341 003406 000000 -WOROD O 

1342 003410 000000 -WORD O 

1343 003412 000000 -WORD O 

1344 003414 024700 TABLS: .WORD 24700 
1345 003416 000000 . 0 60 

i346 003420 000000 wORD Vv 

1347 003422 000000 -WORD O 

1348 003424 025000 TAB16: .WORD 25000 
1349 003426 175363 -WORD 175368 
1350 0034350 123456 wORD 123456 
1351 003432 123456 . WORD 25456 
1352 003434 030000 TABL7?: .WORD 30000 
1353 003436 007020 - WORD 7020 
1354 003440 000000 000000 -WORD 0,0 
1355 003444 023456 TAB18: .WORD 23456 
1356 003446 000000 -WORD O 

1357 003450 000000 -WORD O 

1358 003452 000001 . WORD 


1 
135% 003454 100200 000000 000000 [ABe1: WORD 100200,0,0,0 
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000000 
000000 
000000 


000000 
000000 
177777 
177777 
177777 
124242 
000000 
124242 
000000 


004052 


000000 
900000 
177777 
177777 
000000 
052525 
052525 
000000 
000000 


05 APR 
GLOBAL 
TAB22: 


TAB24; 
TAB2S: 
TAB26: 
TAB2?: 
TAB28: 
TAB29: 
TAB29A 


TAB3O: 
TABS1: 
TAB32: 
TABSS: 
TAB34; 
TAB4O: 
TAB41: 
TAB42: 
TAB43: 
TA(45: 
TAB46: 
TAB4?: 
TAB47A 
TAB4S: 


TABS9;: 


START: 


C4 


-84 16;45 PAGE 29 


DATA SECTION 


. WORD 100400,0,9,0 
-WORD 200,0,9,1 
-WORD 62400,0,0,0 

. WORD 1100,0,0,0 

. WORD 100600,V0,0,0 

. WORD 1000,0,0,9 
-WORD 600,0,0,0 

. WORD 10100,0,0,0 

. WORD 10100,0,2000,0 


. WORD 500,0,0,0 

. WORD 100400,0,0,0 

. WORD 16000,0,0,0 

. WORD 11600,0,C,0 

-WORD 640,0,0,0 

. WORD 77600,0,0,0 

WORD 100200,0,0,1 

-WORD 340,0,0,0 

WOPD «=-w 77, 177777, 277777,1777%6 
-WORD 577, -1,-1,-1 

. ARO 577,-1,0,0 

. WORD 173737,124242,052525, 12346 
. WORD 0,0,052525, 12346 

. WORD 173737,124242,0,0 

-WORD 600,0,0,0 


33 LCP/ORION ROUTINE TO SAVE EMTULATOR AND PRIORITY 


EMTSAV: 


TST SAV 50 33 FIRST TIME THROUGH ? 
BNE VMIKOR 33 BRANCH IF BEEN MERE ALREADY 


SEQ 0028 


epee, eat 


COKDAB 


os 


CLUSTER 
S-APR 84 


032737 


012737 
012737 
012737 


012737 


013746 
012737 
012737 
012737 
022777 
001012 


000403 
012716 
000002 


012737 
012757 


Tera! 


000040 


27 79 
ane 


000100 
177777 
000042 


000030 
000032 


80( 1046) oo bah oR? 


00005. 


004056 
000052 


000026 
133550 


001115 
001106 
001110 


001140 
001142 


D4 


PAGE 50 
TA deat Pon 
BIT BITS ,ae52 
BEQ VMKOR 
BIT #BIT6, 3052 
BEQ 1$ 
MOV #-1,UQUIET 
1$: EMT 42 
CLR 42(RO) 
MOV 30,SAV350 
MOV 32,SAV32 
BR VMKOR 
SAV30: .WORD te) 
SAV32: .WORD (¢) 
UFOFLG: .WORD 0 
UQUIET;: .WORD 0 
VMKOR ; 


33 ARE WE IN UFD MODE ? 

33 LEAVE IF NOT 

33 SET UFD FLAG 

33 ARE WE IN QUIET MODE ? 

3; BR IF NOT 

33 SET QUIET MODE 

33 GET ADDRESS OF XXDP DCA TABLE 
33 CLR XxXDP+ “DRSERR” 

33 SAVE EMULATOR ADDRESS 

3s SAVE EMULATOR PRIORITY LEVEL 
33; GET AROUND TAG AREA 

33 PUT EMULATOR INFO HERE 

+3 PUT PRIORITY LOCATION 

33 USER FRIENDLY MODE FLAG 

33 UFO QUIET MODE FLAG 


HERE 


FOSCSSSASHSHASHAEHHHESHEEEASSHEESEHEHASHEHEHESESHESESHEHEHHSESESHHSHEEEEHEEEEEEEEES 


1$: 
.SBTTL INITIALIZE THE COMMON TAGS 


3:CLEAR THE COMMON TAGS ($CMTAG) AREA 


ssFIRST LOCATION TO BE CLEARED 
ssCLEAR MzZMORY LOCATION 


3;LOOP BACK IF NO 
33SETUP THE STACK POINTER 


@$SCOPE ,AGIOTVEC ;;IOT VECTOR FOR SCOPE ROUTINE 


@SERROR ,BOEMTVEC ;;EMT VECTOR FOR ERROR ROUTINE 
OSTRAP ,AOTRAPVEC ;; TRAP VECTOR FOR TRAP CALLS 


33SETUP END-OF -PROGRAM COUNTER 

ss INITIALIZE NUMBER OF ITERATIONS 
ss;CLEAR THE ESCAPE ON ERROR ADDRESS 
ssALLOW ONE ERROR PER TEST 

ss INITIALIZE THE LOOP ADDRESS FOR SCOPE 


MOV OsCMTAG,RE 

CLR (R6)> 

CMP @SWR,.RE ; ;DONE? 

BNE -6 

MOV ast ACK , SP 

jomeren A FEW VECTORS 

a 0340, @010TVEC +2 ssLEVEL 7 
Vv 

wn 0340 ,.QOEMTVEC+2 ;3;LEVEL 7 
Vv 

MOV 0340, ,BOTRAPVEC+2;LEVEL 7 

MOV @SPWRON,@OPWRVEC ;;POWER FAILURE VECTOR 

MOV 2340 ,AOPWRVEC+2 3;LEVEL 7 

MOV SENOCT, SEOPCT 

CLR STIMES 

CLR SESCAPE 

MOVB 01, SERMAX 

MOV ae 

MOV , $LPERR 


33;SETUP THE ERROR LOOP ADDRESS 


33SIZE FOR A HARDUARE SWITCH REGISTER, IF NOT FOUND OR IT IS 


s;EQUAL TO A "-1", 


MOV @PERRVEC, -( SP) 
MOV 964% ,AVERRVEC 
MOV ODSWR , SWR 
MOV #DDISP ,.DISPLAY 
CMP -1,9SWR 
BNE 66$ 
BR 65% 

643; MOV 0653 ,( SP) 
RTI 

65%: MOV OSWREG, SWR 
MOV @DISPREG, DISPLAY 


SETUP FOR A SOFTWARE SWITCH REGISTER. 


33SAVE ERROR VECTOR 

33SET UP ERROR VECTOR 

33SETUP FOR A HARDWARE SWICH REGISTER 
s3AND A HARDWARE DISPLAY REGISTER 
33TRY TO REFERENCE HARDWARE SwR 
3;BRANCH IF NO TIMEOUT TRAP OCCURRED 
33AND THE HARDWARE SWR IS NOT = -1 
33BRANCRM IF NO TIMEOUT 

33SET UP FOR TRAP RETURN 


ssPOINT TO SOFTWARE SwR 


SEQ 0029 
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1472 
1473 
1474 
1475 
1476 
1377 
1478 
1479 
1480 
1381 
1482 


004304 


004564 


O05 - APR -84 
012637 
005037 
132737 
001403 
012737 
013737 


012737 
012737 


012711 


005227 
001044 
022737 
001440 


112737 
000415 


032737 


MACY11 30( 1046) 


16:45 
000004 


001206 
000200 


004432 
177777 
177777 
133610 
004514 
000042 
001220 
001140 


000001 


000200 
132452 


000042 


000001 
000176 


001134 


000052 


E 3 
OS-APR-84 16:45 PAGE 31 
INITIALIZE THE COMMON TAGS 


663: MOV (SP)+,@@ERRVEC ;;RESTORE ERROR VECTOR 
CLR $PASS 3sCLEAR PASS COUNT 
BITB @APTSIZE,SENVM 3; TEST USER SIZE UNDER APT 
BEQ 67% 33YES,USE NON-APT SWITCH 
ere MOV @SSWREG, SWR 3sNO,USE APT SWITCH REGISTER 
MOV UFDFLG,UQUIET sABORT IN UFD ON ERROR 
MOV @TOUT,QVERRVEC ;POINT TO TIMEOUT ROUTINE 
MOV 0340 ,Q0ERRVEC+2 ;AT PRIORITY 7 
MOV ORAMPAR ,80114 sPOINT PARITY ABORT 
MOV 9340,80116 sAT a 
MOV OMMUTRP , 80250 Demagl sats: TRAP VECTOR 
MOV 0340, 80252 
CLR 80177766 ;CLEAR CPU ERROR REGISTER 
BIT ©BIT06, 8052 :IN UFD QUIET MODE 
BNE LOOP sIF SO, SKIP PRINTOUT 
MOV #,+12,R1 sSTORE LOCATION POINTER 


MOV #-1,(R1) sMAKE SURE TO PRINT NOT ONLY AT FIRS? TIME 
-SBTTL TYPE PROGRAM NAME 
33;TYPE THE NAME OF THE PROGRAM IF FIRST PASS 


INC @-1 s3sFIRST TIME? 
BNE 68s ;;BRANCH IF NO 
CMP @sENDAD , 8042 33ACT-11? 
BEQ 68$ ee IF YES 
TYPE 698 :;TYPE ASCIZ STRING 
.SBTTL GET VALUE FOR SOF TWARE SuiTCH REGISTER 
TST Q42 33ARE WE RUNNING UNDER XxDP/ACT? 
BNE 70$ :;BRANCH IF YES 
CMPB SENV,41 33ARE WE RUNNING UNDER APT? 
BEQ 70$ 3;BRANCH IF YES 
CMP SWR , @SWREG 33SOFTWARE SWITCH REG SELECTED? 
BNE 718 3;BRANCH IF NO 
Haas a 3;GET SOF T-SWR SETTINGS 
a MOVB #1, $AUTOB 33SET AUTO-MODE INDICATOR 
18: 
BR 68 3;GET OVER THE ASCIZ 
520s -ASCIZ + ae B CPU DIAGNOSTIC*<CRLF > 
BIT OB ITO7,aeS2 sUFD MODE ? 
BNE LOOP 3IF YES, BRANCH 
JSR PC ,Q22SI2Z 3SIZE FOR Q22BE 
LOOP: 
-OSABLE AMA 


PPEVUVTYICirririri iri rit irr iririr iri tit ii iti ititiit iii titi iti tT) 

TSTl: SCOPE 

.SBTTL BASE INSTRUCTION SET TESTS 

FOOSE EEEEEE EOE EOEEEEEEEERESOOEEHEEEEE HERES EEOEEEEEEEOEEEEEEEEEEEE He 8 
FOPOOOOEEEEAHEEEEEE OEE EEHAEEEOSOEREEESEEEEHESEEREDEEEEEEEEEESEEEEED EEO EOO EES 
; BEGIN BASE INSTRUCTION SET TESTING 

FECHA OEROEEEOOEEEEOEEEEEEHESEREES EER EEEEEEOSEEEEEREREEE EEE EEEED EH EEESS 
FEAR OEEEEEEEEAEEHEEO EASED EOEEEEEO EEE EEEOEEEEOEEEOEHEEE EE HERES EEO HEE EEE 


FRSTST; 
sTEST BEQ BNE INSTRUCTIONS 


SEQ 0030 
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1528 
1529 


000277 
000244 
001401 
001001 


104001 
000257 
000264 
001001 
001401 


104001 


012737 
022737 
001401 


05 -APR -84 16:45 


000000 


125252 000000 
125252 000000 


OS-APR-84 16:45 PAGE 32 
BASE INSTRUCTION SET TESTS 


FT EFOSSHASHHAEEHEEHESEEESEEEEEHAHEESEHEEASEEEEEAEEEOEEEHEAEEEEEEEEEEEEE 


; THESE TWO INSTRUCTIONS ARE FUNDAMENTAL TO RECOGNIZING ERROR CONDITIONS 


scc 

CLZ 

BEQ 1$ 

BNE es 
1 ERROR +l 
es: ccc 

SEZ 

BNE 3$ 

BEQ 4$ 
3$: ERROR ol 
4s; 
Me: 
i TEST BRANCH ON CARRY 


:CC*0100 - Z BIT CLEARED 

3@TEST INSTR -TRY TO CAUSE A BEQ ERROR 

;BRANCH IF GOOD 

;THE Z FLAG DIONT CLEAR OR BRANCH FAILED. 
sFAILURE AT THIS LOCATION 

:;COULD MEAN A BUS PROBLEM, MICRO-CODE PROBLEM 
a CODE PROBLEM OR JUST ABOUT ANYTHING 
sELSE. 

;CPU ERROR 


3 
sCOND CODES = 0100 (ZERO) 

3¢TEST INSTRe TRY TO BRANCH ON ZERO FLAG 
3*TEST INSTR* BRANCH IF GOOD 

;BRANCH FAILURE WITH Z BIT SET 

;CPU ERROR 

sEND OF TEST 


FEST SSASSASHASSSASSESHSHEASSEESEHREEHEEHAEEHEHASHEEHEEEEASEHEEHEESEEEEEEEOEED 


s*HIS IS A TEST TO SEE IF THE MODULE FORM ANTICIPATED IS FEASIBLE. 


ccc 
Bcc es 

1$: ERROR el 

2s: SEC 
6cs 4$ 

3$: ERROR +l 

4$: 

M3 

; TEST DATA PATHS 
CLR RO 
BNE 1$ 
CLR CRO) 

BNE 1$ 
TST avo 
BEQ 2s 

1$: ERROR +l 

2s: 

M4: 

; TEST DATA PATHS - 
MOV #125252 ,800 
cmMP #125252 ,a00 
BEQ es 


:CC=0000 

3*TEST INSTRe 

;BRANCH CARRY CLEAR FAILED 
;CPU ERROR 

3CC+1111 

3*¢TEST INSTRe 

; BRANCH CARRY SET FAILED 
;CPU ERROR 


;TRY TO INSURE WE ARE TESTING 

;THE DATA PATH AND NOT THE “CLR RO” INSTRUCTION 
sFORCE LOCATION TO ZERO 

;TRY TO INSURE 0-0 

sAGAIN, TRY TO INSURE THAT 0=0 

;BRANCH IF GOOD 

sLOCATION O NOT SETUP PROPERLY 

;CPU ERROR 


ONES AND ZEROS 


30=125252 

3SEE IF DATA MADE IT 

;BRANCH IF IF DATA IS GOOD 
;ERROR! EITHER THE BUS IS BAD, 
;OR THE MOV OR COMPARE 

; INSTRUCTIONS FAILED 


SEQ 0031 


COKDABO KDJ11 B CLUSTER MACY11 30( 1046) 
coKpar .P 74° 


1584 
1585 
1586 
1587 
1588 


11 O05 -APR 84 16:45 


004662 
004664 


0046004 


005004 
005010 
005014 


005016 
005020 
5022 


104001 


012737 
023727 
001401 
104001 


012701 
020127 
001401 


104001 
005001 
020127 


052525 000000 
000000 052525 


000000 
000000 


177777 
Revere 


000000 


125252 
125252 


052525 
052525 


177777 
177777 


177777 


05 - APR - 84 


G4 


45 PAGE 335 
BASE TNSTRUCT ION SET TESTS 


1$ 
es: 


1$: 
2s: 
3$: 


4$: 


; 
GPR1TS: 
i 


1$: 


ERROR ol 


TEST DATA PATHS 


MOV #052525 ,800 
CMP a0, #052525 
BEQ es 
ERROR +1 


TEST DATA PATHS - 1° 


CLR ae 

COM 

CMP 300,0177777 
BEQ es 

ERROR ol 
RO BIT TESTS 

MOV #177777,R0 
CMP RO, 0177777 
BEQ 1$ 
ERROR +1 

CLR RO 

CMP RO, #0 

BEQ es 

ERROR el 

MOV #125252 ,RO 
CMP RO, #125252 
BEQ 3$ 
ERROR ol 
MOV #52525 ,RO 
CMP RO, #52525 
BEQ 4$ 

ERROR +1 


R1 BIT TESTS 


MOV 0177777,R1 
CMP R1,0177777 
BEQ 1$ 

ERROR +1 

CLR R1 

cmp R1,%0 


;CPU ERROR 
sEND OF TEST 


- DATA 0’'S AND 1'S 


sSETUP DATA 


s TEST FOR CORRECT DATA 


;CPU ERROR 


3SET UP MEMORY LOCATION O = 111111 


; TEST DATA 
;BRANCH IF NO ERROR 
;CPU ERROR 


3RO=177777 

sD0ES RO=177777 

:YES GO ON 

;NO GO TO ERROR 
;CPU ERROR 

;RO=0 

3;D0ES RO=-0 

:YES GO ON 

sNO GO TO ERROR 
;CPU ERROR 

:RO=125252 

;D0ES RO=125252 

:YES GO ON 

:NO GO TO ERROR 
;CPU ERROR 

3RO=52525 

;D0ES RO=52525 

:YES GO ON 

:NO GO TO ERROR 
3;CPU ERROR 


sR1L=177777 
sD0ES R1=177777 
:YES GO ON 
sNO GO TO ERROR 
;CPU ERROR 

3R1=0 

;D0ES R1-+0 


SEQ 0032 


COKDABO KDJ11-B CLUSTER MACY11 30( 1046) 
COKDAB.P11 05 - APR - 84 


10640 005026 


1676 005136 
1677 005140 


1679 005140 


001401 


104001 
012701 
020127 
001401 


104001 
012701 
020127 
001401 


104001 


012702 
020227 
001401 


104001 
005002 
020227 
001401 


104001 
012702 
020227 
001401 


104001 
012702 
020227 
901401 


104001 


012703 
020327 


16:45 


125252 
125252 


052525 
052525 


177777 
177777 


125252 
125252 


052525 
052525 


177777 
177777 


125252 
125252 


05 - APR -84 


16:45 PAGE 34 


BASE INSTRUCTION SET TESTS 


es: 


3$; 


4$: 


; 
GPReTS: 
3 


1$: 


es: 


3$: 


1$: 


2s: 


BEQ 


es 


+1 
#125252,R1 
— 


+1 
#52525,R1 
R1,452525 
as 


+1 


R2 BIT TESTS 
MOV 


#177777,R2 
Re, 0177777 
1$ 


+1 
#125252 ,,R2 
oo 


+1 

#52525 Re 

ry hates 
$ 


“1 


R3 BIT TESTS 
MOV 


9177777,R3 
R3, o177777 
18 


ol 

#125252 ,,R3 

ial 
$ 


ol 


Hs4 


3CPU 


3CPuU 


;CPU 


;CPU 


3CPu 


3CPuU 


3CPU 


3CPU 


3;CPU 


3CPU 


:YES GO ON 
3NO GO TO ERROR 
ERROR 
3R12125252 
:DOES R1=125252 
sYES GO ON 
sNO GO TO ERROR 
ROR 


S ON 
sNO GO TO ERROR 
ERROR 


3R2*177777 

sD0ES R22177777 

:YES GO ON 

;NO GO TO ERROR 
ERROR 

3R2-0 

;D0ES R2=0 

;YES GO ON 

:NO GO TO ERROR 
ERROR 

3R2=125252 

sD0ES R2=125252 

:YES GO ON 

NO GO TO ERROR 
ERROR 

3R2252525 

sDOES R2=52525 

;YES GO ON 

:NO GO TO ERROR 
ERROR 


3R3=177777 

;sDOES R3=177777 

:YES GO ON 

:NO GO TO ERROR 
ERROR 

3R3=0 

:;D0ES R3-0 

:YES GO ON 

sNO GO TO ERROR 
ERROR 

3R3=125252 

3sD0ES R3*125252 

3YES GO ON 

sNO GO TO ERROR 
ERROR 


SEQ 0033 


COKDABO KDI11 B CLUSTER 


COKDAB.P 11 


005202 
005206 
00S212 
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012703 
020327 
001401 


104001 


020527 


MACY11 30( 1046) 
16:45 


052525 
052525 


000000 


125252 
125252 


052525 
052525 


177777 
arT7T7 


125252 
125252 


052525 
052525 


O05 -APR -84 


3$; 


1$: 


2s: 


3$; 


1$; 


2s: 


3$: 


16:45 PAGE 35 

BASE INSTRUCTION SET TESTS 

MOV #52525,''5 

CMP R3,452525 

BEQ 4$ 

ERROR ol 

R4 BIT TESTS. 

MOV 177777,R4 

CMP R4,0177777 

BEQ 1$ 

ERROR ol 

CLR R4 

CMP R4,4%0 

BEQ es 

ERROR el 

MOV #125252 ,R4 

CMP R4, 0125252 

BEQ 3$ 

ERROR ol 

MOV #52525 ,R4 

CMP R4, #52525 

BEQ 4s 

ERROR ol 

RS BIT TESTS 

MOV 9177777,R5 

CMP RS,@177777 

BEG 1$ 

ERROR ol 

CLR RS 

CMP R5, #0 

BEQ es 

ERROR ol 

MOV #125252 ,R5 

CMP R5,4125252 

BEQ 3$ 

ERROR ol 

MOV #52525 ,R5 

CMP R5,4%52525 

BEQ 43 

ERROR ol 


43: 
” 
GPRETS5: 


. @ 


3R3=52525 

3D0ES R3-52525 

:YES GO ON 

:NO GO TO ERROR 
;CPU ERROR 


3R42177777 

3sDO0ES R4+=177777 

:YES GO ON 

sNO GO TO ERROR 
;CPU ERROR 

3R4=0 

;D0ES R4=0 

3YES GO ON 

3NO GO TO ERROR 
;CPU ERROR 

3R42125252 

3;D0ES R42#125252 

:YES GO ON 

sNO GO TO ERROR 
;CPU ERROR 

3R4=52525 

sDOES R4=52525 

:YES GO ON 

sNO GO TO ERROR 
;CPU ERROR 


:RS*177777 

sCOES R5=177777 

:YES GO ON 

3NO GO TO ERROR 
;CPU ERROR 

3R5-0 

;D0ES R5=0 

:YES GO ON 

:NO GO TO ERROR 
;CPU ERROR 

3R5=125252 

sD0ES R5=125252 

sYES GO ON 

3NO GO TO ERROR 
;CPU ERROR 

3R5=52525 

sD0ES R5+=52525 

3;YES GO ON 

:NO GO TO ERROR 
;CPU ERROR 


COKDABO KNJ11 B CLUSTER MACY1L1L 
COKDAB.P11 


0S -APR-84 16:45 
012706 177777 
020627 177777 
001401 
104001 
005006 
020627 000000 
001401 
104001 
012706 125252 
020627 125252 
001401 
104001 
012706 052525 
020627 052525 
001401 
104001 
012706 001000 
012737 000377 
022737 000357 
001401 
104001 
005037 177776 
022737 000000 
001401 
104001 
012737 000105 
022737 000105 
001401 
104001 
012737 000252 
022737 000252 
001401 
104001 
005004 
005104 

5004 


30( 1046 ) 


177776 
177776 


177776 


177776 
177776 


177776 
177776 


® 


JSS 


OS-APR-84 16:45 PAGE 36 
BASE INSTRUCTION SET TESTS 
: R6 BIT TESTS 
MOV #177777,R6 3R6+=177777 
CMP R6,0177777 sDOES R6=177777 
BEQ 1$ sYES GO ON 
:NO GO TO ERROR 
ERROR +1 ;CPU ERROR 
1$: CLR R6 3R6=0 
CMP R6, #0 ;D0ES R6+0 
BEQ 2s sYES GO ON 
:NO GO TO ERROR 
ERROR ol ;CP! ERROR 
es: MOV #125252 ,R6 :R6*125252 
CMP R6,4125252 sD0ES R6=125252 
BEG 3$ :YES GO ON 
s:NO GO TO ERROR 
ERROR +1 ;CPU ERROR 
3$: MOV #52525 ,R6 3R6*52525 
* CMP R6, #52525 ;D0ES R6=52525 
BEQ 4$ sYES GO ON 
3;NO GO TO ERROR 
ERROR +l ;CPU ERROR 
4$: MOV @STBOT ,R6 sRESTORE SP 
H 
PSWBTS: 
: PSW LOW BYTE BIT TESTS 
MOV 0377,80177776 3PS=357 T BIT SHOULDN'T SET 
CMP #357,980177776 ;D0ES PS=357 
BEQ 1$ sYES GO ON 
sNO GO TO ERROR 
ERROR ol ;CPU ERROR 
1$: CLR 89177776 3PS=0 
CMP #0 ,80177776 ;D0ES PS=0 
BEQ 2s ;YES GO ON 
3NO GO TO ERROR 
ERROR +1 ;CPU ERROR 
2s: MOV #105,80177776 3PS-=105 
cmp #105,90177776 ;D0ES PS-=105 
BEQ 3$ :YES GO ON 
sNO GO TO ERROR 
ERROR ol ;CPU ERROR 
3%: MOV $252 ,80177776 3PS=252 
CMP $252 ,980177776 ;D0ES PS=252 
BEQ 4$ YES GO ON 
:NO GO TO ERROR 
ERROR +l ;CPU ERROR 
4$; 
MSPO: 
3 TEST SINGLE OPERAND INSTRUCTIONS- MODE O 


SESH SHOSSSHESEHSSEHESHEEESESEEHSESHEOEESHEHHEEEEHEEEHEEHEEHESHEEEHESEHEEEEEEEEEE 


3 THE INC, COM, CLR, AND DECREMENT INSTRUCTIONS ARE VERIFED. 


CLR R4 
COM R4 
CLR R4 


sINITIALIZE R& WITH DATA 
4 
s¢TEST INSTRUCTION 


SEQ 9035 


Ik 4 
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COKDAB.P11 05-APR-84 16:45 BASE INSTRUCTION SET TESTS SEQ 0036 
1808 005540 001401 BEQ 2s ;BRANCH IF R4 CLEARED 
1809 005542 104001 1$; ERROR +1 ;CPU ERROR 
1810 005544 005104 2s: COM R4 3#TEST COMPLIMENT INSTRUCTION 
1811 005546 005204 INC R4 ;@TEST INCREMENT INSTRUCTION 
1812 005550 001401 BEG 4$ ;BRANCH IF R4 =0 
1813 ;COMPLIMENT OR INCREMENT FAILED 
1814 005552 104001 3$; ERROR ol ;CPU ERROR 
1815 005554 4$: 
1816 
1817 3 
ete 005554 MSPB: 
8 
1820 F TEST SINGLE OPS - EVEN BYTE OF CLRB, DECB, AND COMB 
1821 005554 005004 CLR R4 
1822 005556 005104 COM R4 sSETUP TEST REGISTER 
1823 005560 105004 CLRB R4 3*TEST CLEAR BYTE INSTRUCTION 
1824 005562 001401 BEQ es sBRANCH IF GOOD ” 
1825 sCLEAR EVEN BYTE FAILED 
1826 005564 104001 1$: ERROR 1 ;CPU ERROR 
1827 005566 105304 2s: DECB R4 3*TEST DECREMENT BYTE 
1828 005570 100002 BPL 3$ sDECREMENT BYTE FAILED 
1829 005572 105104 COMB R4 3*TEST COMPLIMENT BYTE 
1830 005574 001401 BEQ 4$ ;BRANCH IF GOOD 
1831 ;COMPLIMENT OR DECREMENT FAILED TO wORK 
1832 005576 104001 3$: ERROR +1 ;CPU ERROR 
1833 005600 4s; 
1834 
1835 ; 
1835 005600 MSPC: 
1837 ; TEST SINGLE OPS - MODE 1 Ci.RB, COMB, AND INCB 
1838 005600 005004 CLR R4 
1839 005602 005014 CLR (R4) 
1840 005604 005114 COM (R4) ;SETUP TEST DATA 
1841 005606 005014 CLR (R4) 3*TEST INSTRUCTION 
1842 005610 001401 BEQ 2s sBRANCH IF GOOD 
1843 sMODE 1 FAILED 
1844 005612 104001 1$: ERROR +1 ;CPU ERROR 
1845 005614 005114 2s: COM (R4) 3@TEST INSTRUCTION 
1846 005616 001403 BEQ 3$ 3(€O)SHOULD = -1l 
1847 005620 100002 BPL 3$ 3 
1848 005622 005214 INC (R4) :#TEST INSTRUCTION 
1849 005624 001401 BEQ 4s ;BRANCH IF GOOD 
1850 3COM OR INC FAILED TO ALTER LOC O CORRECTLY 
1851 005626 104001 3$; ERROR +1 ;CPU ERROR 
1852 005630 4s: 
1853 
1854 : 
1855 005630 MSPD: 
1856 
1857 ; TEST SINGLE OPS MODE1L-EVEN BYTE CLRB,COMB, INCB 
1858 005630 005004 CLR R4 
1859 005632 005014 CLR (R4) 
1860 005634 005114 COM (R4) ;SETUP TEST DATA 
1861 005636 105014 CLRB (R4) s¢TEST INSTRUCTION 
1862 005640 105014 CLRB (R4) 3¢TEST INSTRUCTION 


1663 005642 001401 ~ BEQ es sBRANCH IF GOOD 


COKDABO KNJ11 8 
COKDAB.P11 


CLUSTER MACY11 30(1046) 0O5-APR-84 16:45 PAGE 38 


0S -APR-84 16:45 


104001 
105214 
100405 
001404 
105114 
105214 
105214 
001401 


104001 


BASE TNSTRUCT TON SET TESTS 


a. 


sCLEAR (0) EVEN BYTE FAILED 
RROR 


1$: ERROR +1 ;CPU E 
2s: INCB (R4) 3#TEST INSTRUCTION 
BMI 3$ ; TEST FLAGS 
BEQ 3$ 
OMB (R4) ;*TEST INSTRUCTION 
INCB (R4) 
INCB (R4) 
BEQ 4$ ;BRANCH IF GOOD 
;COMB OR INCB FAILED 
3$; ERROR +1 ;CPU ERROR 
4$: 
. 
MSPEO: 
3 TEST SINGLE OPS - ODD BYTE - CLRB, COMB, DECB 
CLR R4 
CLR (R4) 
COM (R4) ;SETUP TEST DATA 
INC R4 sPOINT TO OOD BYTE 
CLRB (R4) 3@TEST INSTRUCTION 
BEQ 1$ ;BRANCH IF GOOD 
sCLEAR ODD BYTE FAILED 
ERROR +1 ;CPU ERROR 
1$: DEC R4 sPOINT TO EVEN BYTE 
INC (R4) ;LOC 0-1 0 
INC R4 sPOINT TO ODD BYTE 
COMB (R4) 3*TEST INSTRUCTION 
INCB (R4) ;LOC O=-1 0 
BPL es ;BRANCH IF ERROR 
BEQ $ 5 
INCB (R4) 3*¢TEST INSTRUCTION 
BEQ 3$ ;BRANCH IF GOOD 
sMODE 1, OOD BrTE FAILED 
2s: ERROR +1 ;CPU ERROR 
3$; 
3 
MSPF 
F TEST SINGLE OP - MODE 2 - CLR, COM, INC 
CLR R4 
COMB R4 
INC R4 3R4=400 
CLR (R4) 3400-0 
COM (R4) 3400-1 
CLR (R4)> 3¢TEST INSTRUCTION 
BEG 1$ ;BRANCH IF GOOD 
sMODE 2 CLEAR FAILED 
ERROR ol SCPU ERROR 
1$: DEC R4 
DEC R4 3;R4=400 
COM (R4)> 3¢TEST INSTRUCTION 
BPL 2s ;BRANCH IF FAILURE 
DEC R4 
DEC R4 3;R4-400 


SEQ 0037 


COKDABO KDJ11-8 


CoKo 


1920 
1921 


AB.P1L 


005 764 
005 766 


005770 
005772 


M4 


) 


we MACY11 3001046) 0O5-APR PAGE 39 
05-APR-84 16:45 BASE TNS TRUC tin SET TESTS 
005224 INC CR4)> 3*TEST INSTRUCTION 
001401 BEQ 3$ ;BRANCH IF GOOD 
sMODE 2 FAILURE 
104001 . ERROR +1 ;CPU ERROR 
MSPG: 
; TEST CLRB, COMB, DECB, MODE 2 - EVEN Brie 
005004 CLR R4 
105104 ComB R4 
005204 INC R4 3R4=400 
005014 CLR (R4) 
005114 COM CR4) 3400--1 
105024 CLRB (R4)>+ 3#TEST INSTRUCTION 
001401 BEQ 1$ ;BRANCH IF GOOD 
sMODE 2 EVEN BYTE FAILED 
104001 ERROR +1 ;CPU ERROR 
005304 1$: DEC R4 
105324 DECB (R4)+ 3*TEST INSTRUCTION 
100003 BPL es ;C°ANCH IF BAD 
005304 DEC R4 sPOINT TO EVEN BYTE 
105124 COMB C(R4)+ 34TEST INSTRUCTION 
001401 BEQ 3$ ;BRANCH IF GOOD 
sMODE 2, EVEN BYTE FAILED 
104001 ‘=: ERROR el ;CPU ERROR 
$: 
MSPH: 
H TEST CLRB, COMB, INCB MODE 2 - ODD BYTE 
005004 CLR R4 
105104 COMB R4 
005204 INC R4 3R4-=400 
005014 CLR (R4) 
005114 COM (R4) 3400=-1 -1 
005214 INC (R4) sPOINT TO OOD BrTE 
105024 CLRB (R4)>+ «~  ;#TEST INSTRUCTION . 
001401 BEQ 1$ sBRANCH IF GOOD 
sMODE 2,000 BYTE FAILED 
104001 ERROR +1 ;CPU ERROR 
005304 1$: DEC R4 sPOINT TO ODD BYTE 
005304 DEC R4 
105224 INCB (R4)+ 3400-1 0 
105124 COMB (R4)-> 3*¢TEST INSTRUCTION 
100003 BPL 2$ sBRANCH IF MODE 2 FAILED 
005304 DEC R4 sPOINT TO ODD BYTE 
105224 INCB (RG )- 
001401 BEQ 3$ ;BRANCH IF GOOD 
sMODE 2,000 BYTE FAILED 
104001 te ERROR +l ;CPU ERROR 
$: 


SEQ 0038 


COKDABO KDJ11-8 wre te pond! 30¢ 1046) OS - APR -84 
COKDAB.P11 45 


1976 
1977 


006074 


0S -APR-84 16 


16:45 PAGE 40 


BASE INSTRUCTION SET TESTS 


MSPI: 


1$: 


1$; 


2s: 
3%; 


N3 


TEST CLR, COM, INC - MODE 3 
CLR R4 $ 
CLR (R4) 30-0 
COMB (R4) : - 
INC (R4) 30=400 
CLR aC R4)> :*TEST INSTRUCTION 
BEQ 1$ ;BRANCH IF GOOD 
sMODE 3 FAILED, 400 SHOULD-0 
ERROR +1 ;CPU ERROR 
DEC R4 
DEC R4 3R4=0 
COM AC R4)> 3#TEST INSTRUCTION 
BPL es ;BRANCH IF BAD 
DEC R4 
DEC R4 sREPOSITION POINTER 
INC @(R4)+ 3@TEST INSTRUCTION 
BEQ 3$ ;BRANCH IF GOOD 
sMODE 3 FAILED 
ERROR +1 ;CPU ERROR 
TEST CLRB, COMB, INCB - MODE 3, EVEN/ODD BrTE 
CLR R4 3R4=0 
CLR RL 
COMB R1 
INC R1 3R1=400 
CLR (R1) 
COM CR1L)> 3400=-1 
CLR (R1) : 
COMB (R1) 3402-000 377 
CLR CR4) 3 
COMB CR4) 3 
INC (R4) 30=400 
CLRB A(R4 )+ 3¢TEST INSTRUCTION 400-377 000 
BEQ 1$ ;BRANCH IF MODE 3 EVEN BYTE CLEARED 
; TEST INSTRUCTION FAILED 
ERROR +1 ;CPU ERROR 
DEC Ro sREPOSTION POINTER 
DEC R4 
COMB a(R4)- 3¢TEST INSTRUCTION 
DEC R4 
DEC RG sREPOSITION POINTER 
INCB a(R4)-+ 3¢TEST INSTRUCTION 
BEG 3$ ;BRANCH IF GOOD 
sMODE 3, EVEN BITE FAILED 
ERROR +1 ;CPU ERROR 
DEC R4 
DEC R4 
INC (R4) 3R4=401 
INCB @(R4)> 3¢TEST INSTRUCTION 
BNE 4s ;BRANCH IF 402 NEQ O 


SEQ 0039 
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006250 


006252 
006254 


006254 


O5-APR-84 16:45 


005304 
005304 


005004 
105104 
005204 
005044 
105114 
005224 
005014 
005124 


b}é 
) 
05 APR-84 16:45 PAGE 41 
BASE INSTRUCTION SET TESTS 


DEC R4 
DEC R4 
CLRB aC R4)- 
BEQ 53 

43: ERROR ol 

S$: DEC R4 
DEC Ra 
COMB a(R4)> 
DEC R4 
DEC R4 
INCB AC R4)- 
BEQ *$ 

63: ERROR ol 

7$: 

3 

MSPL : 

3 TEST CLR, COM, DEC 
CLR R4 
COMB R4 
INC R4 
CLR (R4) 
COM (R4)> 
CLR (R4) 
INC (RG). 
CLR (R4) 
BEQ 1$ 
ERROR ol 

1$: DEC -(R4) 
COM (R4) 
BEQ 2s 
BMI es 
INC Ra 
INC R4 
DEC CRO) 
BEQ 33 

2s: ERROR ol 

3$; 

3 

MSPM; 

3 TEST COMB, INCH, CLRB 
CLR Ra 
COMB R4 
INC R4 
CLR (R4) 
COMB (R4) 
INC (R4)- 
CLR (R4) 
COM (RO). 


: 


3R4*401 

34010 

sBRANCH IF GOOD 
3000 BYTE FAILED 
3CPU ERROR 


3R4-401 
34035377 


s¢TEST INSTRUCTION 
sBRANCH IF GOOD 

sMODE3 ODD BrTE FAILED. 
3CPU ERROR 


- MODE 4 


3R4-400 
3 
3400= 1 


3 

3402*1 

seTEST INSTRUCTION 
sBRANCH IF GOOD 
sMODE 4 FAILED 
;CPuU ERROR 

seTEST INSTRUCTION 400+ 
3400*1 

sBRANCH IF BAD 
sBRANCH IF BAD 
3R4=400 

seTEST INSTRUCTION 
sBRANCH IF GOOD 
sMODE 4 FAILED 
;CPU ERROR 


MODE 4, ODD Orie 
3 ‘ 

1R4 +400 

337H<0 

33/H-001 000 
3900+] 


2 


SEG 9040 


C4 
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COKDAB P11 O05 -APR 84 16:4 BASE INS Stl TESTS SEQ 004; 
O0BB O006SE4O 005204 INC kR4 3R4-405 
208% 006344 105044 CLRB -(R4) : TEST INST. CLEAR ODD Brit (401) 
2090 006346 001401 BEQ es sB8RANCH IF GOOD 
2091 sMODE 4 BYTE FAILED 
2092 006350 104001 1$: ERROR +l ;CPU ERROR 
2093 006352 005204 cs: INC R4 
2098 §=69006354 «60005204 INC Ra 3R4*403 
2095 006356 105144 COMB -(R4) s TEST INST. 4012377 
20% 006360 005304 DEC R4 
2097 006362 005304 DEC R4 
2098 006364 105244 INCB -(R4) : TEST INST. 401-0 
2099 «(006366 «(001401 BEQ 43 sBRANCH IF GOOD 
210 sMODE 4 ODD BYTE FAILED 
2101 006870 104001 8$; ERROR ol :CPU ERROR 
2102 00637 105344 4$; OFCB -(R4) 3¢TEST INST. 
2i08 006374 001401 BEQ 63 ;BRANCH IF GOOD 
2104 sMODE 4 DECREMENT ODD Britt FAILED 
2105 006376 104001 S$: ERROR ol ;CPu ERROR 
2106 006400 63: 
2107 
2108 3 
2109 006400 MSPN: 
2110 
elli 3 TEST CLR, COM, INC MODE 5 
2112 006400 005004 CLR R4 
2113 006402 005014 CLR (R4) 
2114 006404 105114 COMB (R4) 
2115 006406 005224 INC (R4)- 30*400 
2lle 006410 005054 CLR @-(R4) seTEST INST. 400-0 
2117 006412 001401 BEQ 1$ sBRANCH IF GOOD 
2118 sMODE 5 FAILED 
2119 006414 104001 ERROR ol ;CPU ERROR 
2120 C0641i6 v05204 1%: INC R4 
2121 006420 005204 INC Ra sRESET POINTER T0 0 
2122 006422 005154 COM a@-(R4) seTES’ INST. 37641 
2123 006424 001407 BEQ es sBRANCH IF BAD 
2124 006426 005204 INC RA 
2125 006430 005204 INC R4 sREPOSITION POINTER 
2126 006432 005354 DEC @-(R4) seTEST INST. 376-0 
2127 006434 001403 BEQ es 3;BRANCH IF BAD 
2128 006436 005224 INC (R4O)- 20*401 R4&=2 
2129 006440 105254 INCB @ (Ra) seTEST INST. ,400+* O 376 
2130 006442 001401 BEQ s$ sBRANCH IF GOOD 
2131 sMODE 5 FAILED 
2132 006444 104001 2s: ERROR ol 3;CPU ERROR 
2123 006446 3$; 
2134 
2i35 Fy 
2136 006446 MSPO: 
2137 
2138 : TEST NEG MODE 5 
2139 006446 005004 CLR R4 
2140 006450 105104 COMB R4 
2141 006452 005204 INC Ra 3R4-400 
2142 006454 00500! CLR R1 


21483 006456 105101 COMB RL 
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BASE INSTRUCTION SET TESTS 
DEC R1 
CLR R2 
CLR (R2) 
CLR (R44) 
COM (R4) 
CLR (R1) 
NEG @-(R4) 
BEQ es 

1$: ERROR o1 

es DEC a(R4 )- 
NEG a-(R4) 
BEQ 3$ 
BVS 3$ 
BMI 3$ 
6csS 4$ 

3$; ERROR ol 

4$ DEC a(R4)- 
BEQ 63 

S$: ERROR ol 

63%: INCB (R2) 
NEG a-(R4) 
BEG 7$ 
BVS 7$ 
Bcc 7$ 
BMI 8$ 

7$: ERROR ol 

8$: INCB (R2) 
BEG 108 

9%: ERROR +1 

10$: 

t 

MSPP: 

3 TEST CLR, COM, INC 
CLR R4 
INC R4 
INC Ha 
CLR R1 
COMB R1 
INC R} 
CLR (R1) 
COM CR1)> 
CLR (RL) 
INC (RL? 
CLR Re 
CLR (R2) 
CLR 376(R4) 
BEQ es 

18: ERROR ol 

2S: OEC 8/o( RO) 


[44 


3R1*376 
3R2*0 
3020 


os 

3400= -1 

3376°0 

3020 

sBRANCH IF 6000 
sNEG FAILED 
sCPuU ERROR 
30--1 

301 

;BRANCH IF BAD 
sBRANCH IF BAD 
;BRANCH IF BAD 
sBRANCH IF GOOD 
sNEG FAILED 
sCPU ERROR 

; TEST RESULT OF NEGATE 
sBRANCH IF GOOD 
sRESULT OF NEGATE BAD 
;CPU ERROR 

3071 

302-1 

° 


3 

sBRANCH IF GOND 
3BAD NEGATE 
;CPU ERROR 

30-0 

sBRANCH IF GOOD 
3CP1U ERROR 


MODE 6 


3R4=+2 


3R1*400 


i 

3400>-1 

3R1=402 

3402-1 

gRer0 

30-0 

3400-0 

sBRANCH If GOCD 
3CPU ERROR 
3400. 1 


SEQ 0042 


b 4 
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2 006616 005164 000400 com 400(R4 ) 3402=-1 
2201 006622 001405 BEQ 3$ s;BRANCH IF RAD 
2202 006624 005264 000400 INC 400(R4) 3402+ -2 
2203 006630 005264 000400 INC 400( R4 ) 
2204 006634 001401 BEQ 4$ s;BRANCH IF GOOD 
2205 sMODE 6 § AILED 
2206 006636 104001 3$; ERROR +1 ;CPu ERROR 
2207 006640 005261 177776 4s; INC -2(R1) 3400*0 
2208 006644 001401 BEQ 6$ sBRANCH IF GOOD 
2209 sINC MODE 6 FAILED 
2210 006646 104001 5$: ERROR ol ;CPU ERROR 
2211 006650 63: 
2212 
2213 3 
2214 ; 
2215 3 
2216 006650 MSPQ: 
cc ‘ 
2218 ; TEST NEG MODE 6 
2219 006650 005001 CLR R1 R10 
2220 006652 005004 CLR R4 
2221 006654 105104 COMB Ra 
2222 006656 005204 INC R4 3R4=400 
2223 006660 005014 CLR (R4) : 
2224 006662 005114 COM (R4) 3400=-1 
2225 006664 005044 CLR -(R4) 33760 
2226 006666 005044 CLR -(R4) ; 
2227 006670 005224 INC (RO). 3374=1 R4=376 
2226 006672 005464 000002 NEG 2(R4) 3400-1 
2229 006676 001403 BEQ 18 sNEGATE ©AILED 
2230 006700 102402 BvS i$ 
2231 006702 100401 BMI 1s 
2232 006704 103401 BCS es sBRANCH IF GOOD 
2233 ;NEGATE FAILED 
2234 006706 104001 1s: ERROR +1 ;CPU ERROR 
2235 006710 005364 000002 2s: DEC 2(R4) : TEST RESULT OF NEGATE 
2236 006714 001401 BEQ 4s sBRANCH IF GOOD 
2237 sRESULT OF NEGATE FAILED 
2238 006716 104001 3$: ERROR +1 ;CPU ERROR 
2239 006720 005464 000000 4s: NEG O(R4) #020 
2240 006724 001401 BEQ 5$ 3; BRANCH IF GOOD 
2241 ;NEGATE FAILED 
2242 006726 104001 ERROR +1 ;CPU ERROR 
2243 006730 105461 000374 5$: NEGB 374(R1) 337420 377 
2244 006734 102403 BVS 6$ ; 
2245 006736 001402 BEQ 6$ 
2246 006740 100001 BPL 6$ , 
2247 006742 103401 eBcs 7$ ;BRANCH IF GOOD 
2248 ;NEGATE FAILED 
2249 006744 104001 63: ERROR +1 ;CPU ERROR 
2250 006746 105261 000374 7$: INCB 374(R1) 3374-0 
2251 006752 001401 BEQ 93 sBRANCH IF GOOD 
2252 s;NEGATE FAILED 
2253 006754 104001 8s: ERROR +1 ;CPU ERROR 


2254 006756 93: 
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006 756 


005004 
005014 
005002 
105102 
005202 
005012 
005472 
103401 
001401 
104001 


005314 
005474 
001403 
102402 
100401 
103401 
104001 


OS -APR-84 16:45 


000401 


177400 


000400 


05 APR 


-84 16:45 PAGE 45 


BASE INSTRUCTION SET TESTS 


; 
MSPR;: 


18: 
2s: 
3$: 
4$: 


1$: 
2s: 


3$; 
4$: 


TEST CLR, COM, INC 
CLR R1 


CLR R4 
COMB R4 

INC R4 

CLR (R1) 
COMB (R1) 
INC (R1) 
INC (R1) 
INC (R1) 
CLR (R4) 
CLR 2(R4) 
COM 2(R4) 
CLR @-400(R4 ) 
BEQ es 
ERROR +1 

COM ao(R1) 
BMI 4$ 
ERROR ol 

COM RA 

INC a401(R4) 
BEQ 6$ 
ERROR +1 


TEST NEG MODE 7 
R 4 


CL R 

CLR (R4) 

CLR R2 

COMB R2 

INC Ro 

CLR (R2) 

NEG @-400(R2) 
BcS 1$ 

BEQ es 

ERROR ol 

DEC (R4) 

NEG @+-400(R4 ) 
BEQ 3$ 

BVS 3$ 

BMI 3$ 

BCS 4$ 

ERROR 1 


- MODE 7 


3R12=0 
H 


Hy 
3R4=400 


3302402 
3400-0 


3 

3402=-1 

3402=0 

;BRANCH IF GOOD 
;CPU ERROR 

s INSTRUCTION FAILED 
3402=-1 

;BRANCH IF GOOD 
;CPU ERROR 


3402-0 
sBRANCH IF GOOD 
;CPU ERROR 
sMODE 7 FAILED 


30-0 
Hy 


3R2+400 
3400-0 

sNEG OF 0-0 
jeeee 


;BRANCH IF GOOD 
;CPU ERROR 


3 
302-1 


20-1 
;BRANCH IF ERROR 
3 


a 
sBRANCH IF GOOD 


;CPU ERROR 
sNEGATE MODE 7 FAILED 


SEQ 0044 


(544 
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e3ie 3 
2313 007112 MSPT: 
2314 
2315 3 TEST SINGLE OPFRAND MODE 2 REG 7 
2316 007112 005004 CLR R4 
2317 007114 105104 COMB R4 
2318 007116 005204 INC R4 3R4=400 
2319 007120 005027 CLR (R7)> ;CLEAR NEXT LOCATION 
2320 O07122 177777 1$: . WORD -1 ;SETUP INITIAL DATA 
2321 007124 001401 BEQ 3$ ;BRANCH IF GOOD 
2322 007126 104001 es: ERROR +1 ;CPU ERROR 
2323 007130 3$: 
2324 
2325 3 
2326 
2327 007130 MSPU: 
2328 
2329 ; TEST TST MODE O 
2330 007130 005004 LR 4 3R4=0 
2331 007132 000277 scc sCONDITION CODES -1111 
2332 007134 000244 CLZ 3CC=1011 
2333 007136 005704 TST R4 3*TEST INSTRUCTION 
2334 007140 103403 6cs 1$ 
2335 007142 102402 BvS 1$ 
2336 007144 100401 BMI 1$ ;BRANCH IF ERROR 
2337 007146 001401 BEQ 2s sBRANCH IF GOOD 
2338 007150 104001 1$: ERROR el ;CPU ERROR 
2339 3TST MODE O FAILED 
2340 007152 005304 2s: DEC Ra 3R4=-1 
2341 007154 000277 scc 
2342 007156 000250 CLN 3CC=0111 
2343 007160 005704 TST R4 3¢TEST INSTRUCTION MODE O 
2344 007162 103403 BCS 3$ ;BRANCH IF ERROR 
2345 007164 102402 BvS 3$ 
2346 007166 001401 BEQ 3$ 
2347 007170 100401 BMI 4$ sBRANCH IF GOOD 
2348 007172 104001 3$: ERROR ol ;CPU ERROR 
2349 sTST FAILED 
2350 007174 4$: 
2351 
2352 3 
2353 007174 MSPVO: 
2354 : 
2355 3 TEST TST MODE O BYTE 
2356 007174 005004 LR 4 
2357 007176 105104 COMB R4 30=000 377 
2358 007200 000277 scc 
2359 007202 000250 CLN 3CC«O111 
2360 007204 105704 TSTB R4 ;*TEST INSTRUCTION ON EVEN BYTE 
2361 007206 102403 BVS 1$ ;BRANCH IF ERROR 
2362 007210 103402 BCS 1$ 3 
2363 007212 102401 BvS 1$ 3 
2364 007214 100401 BMI 2s ;BRANCH IF GOOD 
oo 007216 104001 1$; ERROR +1 ;CPU ERROR 


é 
2367 007220 005204 2s: _INC R4 sPOINT TO 1 


H4 
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COKDAB.P11 05-APR-84 16:45 BASE INSTRUCTION SET TESTS SEG 0046 
2368 007222 105704 TSTB R4 : TEST INSTRUCTION 
2369 007224 001401 BEQ as sBRANCH IF GOOD 
2370 007226 104001 3$: ERROR +1 sCPU ERROR 
2371 sTST FAILED ON BrTeE 
23? 007230 4$: 

237 

2374 ; 

237 007230 MSPV: 

2376 

2377 8 TEST TST MODE 1 

2378 007230 005004 LR RG 

2379 007232 005014 CLR (R4) 3070 

2380 007234 000277 scc 

2381 007236 000244 CLZ :CC=1011 

2382 007240 005714 TST (R4) 3*TEST INSTRUCTION IN MODE 1 
2383 007242 103403 6cSs 1$ ;BRANCH IF ERROR 
2384 007244 102402 BvS 1$ 

2385 007246 100401 BMI 1$ 3 

2386 007250 001401 BEQ es ;BRANCH IF GOOD 
+44 007252 104001 1$; ERROR ol ;CPU ERROR 

2389 007254 005214 2s: INC (R4) 3071 

2390 007256 000277 scc 

2391 007260 005714 TST (R4) 3 TEST INSTRUCTION 
2392 007262 001403 BEQ 3$ ;BRANCH IF ERROR 
2393 007264 102402 BVS 3$ 

2394 007266 103401 Bcs 3$ 

2395 007270 100001 BPL 4s sBRANCH IF GOOD 
2390 007272 104001 3$: ERROR ol ;CPU ERROR 

2397 sTST FAILED MODE 1 
2398 007274 4$; 

2399 

2400 : 

2401 007274 MSPX: 

2402 

2403 : TEST TST MODE 1 BrTe 

2404 007274 005004 CLR R4 384-0 

2405 007276 005014 CLR (R4) 

2406 007300 105114 COMB (RO) 

2407 007302 005214 INC (R4) 30-001 000 

2408 007304 000277 scc 

2409 007306 000244 CL2Z :CC=1011 

2410 007310 105714 TSTB (R4) s¢TEST INTRUCTION 
2411 007312 103403 BCS 1$ sBRANCH IF ERROR 
2412 007314 102402 BVS 1$ ; 

2413 007316 100401 BMI 1$ 

2414 007320 001401 BEQ es ;BRANCH IF GOCD 
ote 007322 104001 1$: ERROR +1 ;CPuU ERROR 

2417 007324 005204 2s: INC R4 38421 

2418 007326 000277 scc 

2419 007330 105714 TSTB (R4) ; TEST INSTRUCTION 
2420 007332 001403 BEQ 3$ ;BRANCH IF ERROR 
2421 007334 100402 BMI 3$ 

2422 007336 102401 BvS 3$ 


2423 007340 103001 BCC 4$ sBRANCH TR GOD 
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2404 
2425 


007342 
007344 


C07344 


007344 
007346 
007350 
007352 
007354 
007356 
007360 
007362 
007364 
007366 
007370 
007372 
007374 


007376 
007400 
007402 
007404 
007406 
007410 


007412 


007412 


007412 
007414 
007416 
007420 
007422 
007424 
007426 
007430 
007432 
007434 
007436 
007440 


007442 
007444 
007446 
007450 
007452 
007454 
007456 
007460 
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104001 


05 -APR -84 


[4 


16:45 PAGE 48 


BASE INSTRUCTION SET TESTS 


3$; 
4$: 


1$: 


18; 
2s: 


3%; 


ERROR +1 


TEST TST MODE 
CLR R4 
CLR (R4)> 
CLR (R4) 
COM (R4) 
CLR R4 
scc 

CLZ 

TST (R4)- 
6cs 1$ 
BvSs 1$ 
BMI 1$ 
BEQ es 
ERROR ol 
TST (R4)-> 
BCS 3$ 
BVS 3$ 
BEQ 3$ 
BMI 4s 
ERROR ol 


TEST TST MODE 
LR R4 
CLR (R4)- 
COMB -(RS) 
DEC R4 
scc 
CLZ 
TSTB (R4)- 
BVS 1$ 
BCS 1$ 
BMI 1$ 
BEG es 
ERROR 1 
scc 
CLN 
1ST8 (R4)> 
BEQ 5$ 
BCS 3$ 
BvS 3$ 
BMI 4s 
ERROR *l 


2 


; 
:CC=1011 


2 BYTE 


3CPU ERROR 
3 


$ 
30-0 


327-1 
3R4=0 


; TEST INSTRUCTION 
s;BRANCH IF ERROR 


sBRANCH IF GOOD 
3CPuU ERROR 

sMODE 2 TEST FAILED 
3TST LOC? 


;CPU ERROR 
sMODE 2 FAILED 


3 
302377 000 
3R4-=0 


:CC=1011 

3 

;BRANCH IF ERROR 

;BRANCH IF GOOD 

;CPU ERROR 

sMODE 2 EVEN BrTE FAILED 
3CC-O111 


sBRANCH IF GOOD 
;CP.) ERROR 


SEQ 0047 


JA 
A 
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COKDAB.P 11 05-APR-84 16:45 BASE INSTRUCTION SET TESTS SEQ 0048 
2480 sMODE 2 ODD BrTeé FAILED 
2481 007462 a$;: 

2482 
2483 3 
2484 007462 MSPAA;: 
2485 
2486 ; TEST TST MODE 3 
2487 007462 005004 CLR R4 
2488 007464 005014 CLR (R4) 
2489 007466 105114 COMB (R4) 
2490 007470 005214 INC (R4) 30-400 
2491 00747 005034 CLR AC R4)> 34000 
2492 007474 005004 CLR R4 3R4=0 
2493 007476 000277 scc 
2494 007500 000244 CLZ 3CC=1011 
2395 007502 005734 TST @CR4)> 3; TEST MODE 3 
2496 007504 103403 BCS 1$ ;BRANCH IF ERROR 
2497 007506 102402 BvS 1$ 3 
2498 007510 100401 BMI 1$ 
2499 007512 001401 BEQ es ;BRANCH IF GOOD 
2500 007514 104001 1$: ERROR +1 ;CPU ERROR 
2501 sMODE 3 FAILED 
2502 007516 005304 2s: DEC R4 
2503 007520 005304 DEC R4 3R4=0 
2504 007522 005334 DEC AC R4)> 3400=-1 
2505 007524 005004 CLR R4 
2506 007526 000277 scc 
2507 007530 000250 CLN :CC=0111 
2508 007532 005734 TST a(R4)-+ ; TEST INSTRUCTION 
2509 007534 103403 BCS 3$ 3 
2510 007536 001402 BEQ 3$ ;BRANCH IF ERROR 
2511 007540 102401 BVS 3$ 3 
2512 007542 100401 BMI 4$ ;BRANCH IF GOOD 
2513 sERROR MODE 3 
2514 007544 104001 3$: ERROR +1 ;CPU ERROR 
2515 007546 4$: 
2516 
2517 3 
2518 007546 MSPBB: : 
2519 
520 ; TEST TST MODE 3 AUTO-INC 
2521 007546 005004 CLR R4 
2522 007550 005014 CLR (R4) 30=0 
2523 007552 105114 COMB (R4) 3 
2524 007554 005214 INC (R4) 302400 
2525 007556 005001 CLR R1 
2526 007560 105101 COMB R1 
2527 007562 005201 INC R1 3R1=400 
2528 007564 005011 CLR CR1) 3400-0 
2529 007566 000277 scc 
2530 007570 005734 TST a(R4)- 3400-0 
2531 007572 103403 BCS 1$ ;ERROR IF CARRY 
2532 007574 102402 BVS 1$ ;ERROR IF OVERFLOW 
2533 007576 100401 BMI 1$ ;ERROR IF MINUS 
2534 007600 001401 BEG 2s sERROR IF NOT EQUAL 


25%5 007602 104001 1$; ERROR “1 ;CPU ERROR 
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COKDAB.P11 


007604 
00 7606 
007610 
007612 
007614 


007616 


007€16 


007616 
007620 
007622 
007624 
007626 
007630 
007632 
007634 
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005304 
005304 
005704 
001401 
104001 


005004 
005014 
005204 
005204 
000277 
000244 
005744 
103403 
102402 
100401 
001401 
104001 


005 704 


<4 


-84 45 PAGE 50 
16:45 BASE INSTRUCTION SET TESTS 
;CC SHOULD = 0100 
2s DEC & 
DEC R4 
TST R4 3;SEE IF AUTO-INC Fema 
BEQ 4$ sERROR IF R& NE 
3$: ERROR +l ;CPU ERROR 
;AUTO-INC FIALED 
4$: 
MSTB3 
: TEST TST MODE 3 BrTE 
CLR R4 
CLR (R4) 
COMB CR4) 
INC (R4) 
INC (R4) 30-401 
CLR R1 
COMB R1 
INC R1 3R1=400 
CLR (R1) 
COM (R1) 
CLRB (R1) 3400=377 000 
TSTB a(R4)> 3¢@ TEST INSTRUCTION 
BEQ 1$ sERROR IF EQUAL 
BCS 1$ sERROR IF CARRY SET 
BvS 1$ sERROR IR OVERFLOW 
BMI es sBRANCH IF MINUS 
1$: ERROR ol ;CPU ERROR 
;CC ERROR 
2s: DEC R4 
DEC R4 
BEQ 4$ sBRANCH IF AUTO-INC WORKED 
3$: ERROR +1 3CPU ERROR 
;AUTO-INC FAILED 3 
4$: 
a 
MST4 
: TEST TST MODE 4 
CLR Ra 
CLR (R4) 30-0 
INC R4 
INC R4 3R4=2 
scc 
CLZ ; :CC=1011 
TST -(R4) 3@eTEST INTRUCTION 
BCS 1$ ;ERROR IF CARRY 
BvS 1$ sERROR IF OVERFLOW 
BMI 1$ ;ERROR IF MINUS 
BEQ es ;BRANCH IF GOOD 
1$: ERROR el ;CPU ERROR 
:CC WRONG 
2s: TST R4 ; INSURE CORRECT AUTO-DEC 


SEQ 0049 
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007722 


007724 
007726 


007726 


007726 
007730 
007732 
007734 
007736 
007740 
007742 
007744 
007746 
007750 
007752 
007754 
007756 


007760 
007762 
007764 
007766 
007 766 


007766 
007770 
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001401 
104001 


105744 
001401 
104001 


005004 
005014 
105114 


OS-APR-84 16:45 PAGE 5S 
BASE INSTRUCTION SET TEST 


1 
S 


| 4 


;BRANCH IF GOOD AUTO-DEC 
3BAD AUTO-DEC 
;CPU ERROR 


30=377 000 


3R4=2 

34eTEST INSTRUCTION 
sERROR IF EQUAL TO O 
;ERROR IF CARRY 
sERROR IF OVERFLOW 
sBRANCH IF MINUS 
;CPU ERROR 


;CC SHOULD EQUAL 0100 


3##TEST EVEN BYTE 
;BRANCH IF GOOD 
;CPU ERROR 


;CC SHOULD EQUAL 0100 AND R4=-1 


; 
3070, R4-2 


3CC=1011 

; TEST INSTRUCTION 
sERROR IF CARRY 
sERROR IF OVERFLOW 
sERROR IF MINUS 
;BRANCH IF GOOD 
;CPU ERROR 


;CC WRONG, SHOULD = 0100 


;BRANCH IF AUTO-DEC WORKED 
;CPU ERROR 


sAUTO-DEC FAILED 


BEQ 4$ 
3$: ERROR +1 
4$: 

; 
MST4B: 
3 TEST TST MODE 4 BrTE 

CLR R4 

CLR (R4) 

COM CR4) 

COMB (R4) 

scc 

INC R4 

INC 

TSTB CR4) 

BEQ 1$ 

BCS 1$ 

BVS 1$ 

BMI es 
1$: ERROR ol 
2s: TSTB -(R4 

BEQ 4s 
3$ ERROR ol 
4$: 

: 
MSTS: 
: TEST TST MODE 5 

CLR R4 

CLR (R4)> 

scc 

CLZ 

TST a-(R4) 

BCS 1$ 

BvVS 1$ 

BMI 1$ 

BEQ es 
1$; ERROR +1 
2s: TST R4 

BEQ 4$ 
3$ ERROR +1 
4$: 

; 
MSTSB: 
F TEST TST MODE 5 BrTeé 
CLR R4 
CLR (R4) 


COMB (R44) 


SEQ 9059 
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010110 
010112 


010114 
010116 
010122 
010124 
010126 


010130 


010130 


010130 
019132 
010134 
010136 
010140 
010142 
010144 
010146 
010150 
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177400 


000400 


05 -APR 


1$: 


6:45 PAGE Se 
BASE INSTRUCT TON SET TESTS 


CLR 4 

CLR (R4) 
COMB R4 

INC R4 

CLR C(R4) 
COM (R4) 
TST -400(R4 ) 
BcS 1$ 

BvS 1$ 

BMI 1$ 

BEQ es 
ERROR +1 

CLR 

TST 400(R4) 
BEQ 3$ 

BMI 4$ 
ERROR +1 


TEST TST MODE 7 
CLR R 


L 4 
CLR (R4) 
CoM (R4)- 
CLR CR4) 
CLR R2 
CLR R4 
COMB R4 
INC R4 
CLR (R4) 


M4 


30=400 
3400-0, R4=2 


F 
3400#377 000 R4=2 
3#@TEST INSTRUCTION 
sERROR IF CARRY 
sERROR IF MINUS 
;ERROR IF OVERFLOW 
;BRANCH IF GOOD 
;CPU ERROR 


3CC SHOULD = 0100 


30-401 

3#eTEST INSTRUCTION 
;BRANCH IF GOOD 
sEVEN BYTE FAILURE 
;CPU ERROR 


30-0 
3R4=400 


3400=-1 

jeeTES T LOCATION 0 
sERROR IF CARRY 
sERROR IF OVERFLOW 
sERROR IF MINUS 
sBRANCH IF ZERO 
;CPU ERROR 


;CC ARE WRONG 


3 

sTST LOCATION 400 
sERROR IF EQUAL 
;BRANCH IF MINUS 
;CPU ERROR 


;CC ERROR 


30=-1 
32:0 
3R2=0 


3R4-400 
3400-0 


SEQ 905i 
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010152 
010156 
010160 
010162 
010164 
010166 


010170 
010172 
010176 
010200 
010202 


010204 


010204 


010204 
010206 
010210 
010212 
010214 
010216 
010220 
010222 


010224 
010225 
010230 


010230 
010232 


010234 - 


010236 
010240 
010242 
010244 
010246 
010250 


010252 
010254 
010256 


010260 


N4 
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0S -APR-84 16:45 


005774 177402 


005222 
005774 177402 
100401 
001401 
104001 


005004 
005001 
005101 
010104 
001402 
102401 
100401 
104001 


005204 
001375 


BASE INSTRUCTION SET TESTS 


SEQ 0052 


TST @-376(R4) 3##TEST LOCATION O 
BCS 1$ sERROR IF CARRY 
BVS 1$ sERROR IF OVERFLOW 
BEQ 1$ sERROR IF ZERO 
BMI es ;BRANCH IF GOOD 
1$: ERROR +1 ;CPU ERROR 
sERROR IN CC 
es INC (R2)+ 307-2 R2=2 
Ts? @-376(R4) 3#@ CHECK CONTENTS OF LOCATION 2 
BMI 3$ sERROR IF MINUS 
BEQ 4$ ;BRANCH IF GOOD 
3$ ERROR +1 ;CPU ERROR 


3CC SHOULD = 0100 


-SBTTL seeeeeeeeees DOUBLE OPERAND TESTS eeasessesssccsoos 
; 


3CC SHOULD = 100-, 


3R4=0 


sR1L=-1 

:#eTEST MOVE INSTRUCTION 
sERROR IF R4&=0 

;ERROR IF OBERFLOW 
;BRANCH IF MINUS 


;CPU ERROR 

R4 SHOULD: -1 
3R4 SHOULD <0 
;ERROR IF R& NE O 


3R4=0 


sR1=-1 

3¢¢ TEST ADD OF R1 TO RG 
sERROR IF ZERO 

;ERROR IF CARRY 

sERROR IF OVERFLOW 
sBRANCH IF MINUS 

;CPU ERROR 


3CC SHOULD = 1000 , R4=-1 


3R4 SHOULD -O 
sBRANCH IF R4-0 
;CPU ERROR 


3R4 SHOULD - O 


MDMO : 

; TEST MOVE MODE O 
CLR R4 
CLR R1 
COM R1 
MOV R1,R4 
BEQ 1% 
BvS 1$ 
BMi 2s 

18; ERROR +1 

2s: INC R4 
BNE 1$ 

° 

MDAO 

: TEST so “was c¢) 
CLR 
CLR ~~ 
COM R1 
£00 R1,R4 
BEQ 1$ 
BCS 1$ 
BVS 1$ 
BMI es 

1%: ERROR +1 

2s: INC R4 
BEQ 4s 

3%: ERROR ol 

4$: 





yt 
om 
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COKDAB.P 11 05 APR-84 16:45 eecececosece DOUBLE OPERAND TESTS eeeoseccsescseoeoss SEQ 0082 
2760 
27el 3 
th 4 010200 MDSO: 
2r%o8 
2766 3 TEST SUB MODE O 
2765 010260 005004 CLR R4 
2766 010262 005001 CLR R1 
27e7 010264 005201 INC R1 sR1L=1 R420 
2768 010266 160104 SUB R1,R4 seeTEST OF R4-R1, R4=-1 
2769 010270 102408 BVS 1$ sERROR IF v SET 
e770 O1C272 103002 ecc is sERROR IF NO CARRY 
277 010274 001401 BEQ 1$ sERROR IF =O 
e772 010276 100401 BMI es sBRANCH IF MINUS 
e778 O10300 104001 1$: ERROR ol ;CPU ERROR t 
e774 sCC SHOULD = 1001 
2775 010302 005101 es: COM R1 sRiel 
e776 ©10304 005201 INC R1 sGET TWO'S COMPLIMENT, R1=-1 
277” 010306 160104 SUB R1,R4 seeTEST R4-R1 (1- 1s O 
2778 010310 001401 BEQ 4s sBRANCH IF ZERO 
e779 O10312 104001 3$; ERROR el ;CPU ERROR 
2780 sCC SHOULD = 0100 
2781 010314 43: 
2782 
2783 ; 
2? 010314 MDM27: 
2785 
2786 3 TEST MOV MODE 27,00 
2787 010314 000257 ecc 3CC -0000 
2788 010316 012708 125252 MOV 125252 ,R4 seeTEST MOVE 
2789 010322 001401 BEQ 1$ sERROR IF = O 
e? 010324 100401 AMI 2s sBRANCH IF MINUS 
2791 010326 104001 18; ERROR ol :CPU ERROR 
2792 sCC SHOULD = 1000 
2793 010330 012701 052525 2s: MOV 9052525,R1 seeTEST MOVE 
2794 010334 100401 BMI 3$ sERROR IF MINUS 
2795 010336 001001 BNE 4s :BRANCH IF NE O 
2796 010340 104001 3$; ERROR ol 3CPuU ERROR 
2797 3;CC SHOULD + 0000 
2798 010342 060104 4$: ADD R1L,R4 sR1LeR4- 1 
2799 010344 100401 BMI 6$ sBRANCH IF MINUS 
2800 010346 104001 5$: ERROR el :CPu ERROR 
2801 sMOv FAILED 
2802 010350 005204 63; INC ka 3R4-12°O 
coer 010352 001375 BNE S$ sERROR IF NOT ZERO 
2805 ‘ 
2806 010354 MBIOO: 
2807 
2808 3 TEST BIC, BIS MODE 0,0 
2809 010354 005004 CLR R4 
2810 ¢€10356 005104 COM RO ;R4+-1 
2811 010360 012701 125252 MOV 125252 ,R1 sSETUP RL TEST DATA 
2812 010364 012702 052525 MOV 9052525 ,Re2 3R2-COMPL IMENT OF RR} 
2813 010370 000261 Stc 
2814 010372 040104 BIC R1,R4 reeTEST BIC wWITm CARRY set 


2815 010374 103003 BCC 1$ sERROR IF NO CARR 


me" 


COKDABO KDJLL 8B CLUSTER MACYIL 8001046) 05S APR-84 :4 Pp 5 
COKDAB LP 11 05 -APR 84 teas essesocesess BARE OFF RRND TESTS eeeccscsecssesose SEQ 90054 
eB8le 010876 102402 BVS 1$ sERROR IF OVERFLOW 
£817 .010400 001401 BEQ 1$ sERROR IF O 
2818 010402 100001 BPL es sBRANCH IF PLUS 
“819 010404 104001 18; ERROR ol 3CPU ERROR 
2820 sCC SHOULD = 0001 
2821 010406 020402 2s: CMP R4,R2 sCOMPARE CONTENTS OF R4& AND RO 
2822 010410 001401 BEQ 4$ sBRANCH IF EQUAL 
28235 010412 104001 3$; ERROR ol 3CPU ERROR 
2824 3R4 AND R2 SHOULD BE EQUAL 
2825 010414 005301 4$; DEC R1 3R1*125251 
2826 010416 050201 BIS R2,R1 3B81TS 052525 AND 125251°177775 
e827? 010420 100401 BMI 6$ ;BRANCH IF MIUS VALUE 
2828 010422 104001 S$: ERROR +1 3CPU ERROR 
2829 :BAD BIS OPERATION 
2830 010424 005201 68: INC R1 
2831 010426 005201 INC Ri 
2832 010430 005201 INC R1 3R1*0 
2833 010432 001378 BNE 5$ sERROR IF NE O 
2834 
2835 ; 
ts 010434 MBCOO: 
2838 3 TEST BIT, CMP MODE 0,0 
2839 010434 012701 125252 MOV 125252,R1 3R1*125252 
2840 010440 012704 100000 MOV #100000 ,R4 3R4=100000 
2841 010444 012702 052525 MOV ©052525,Re sR2*052525 
2842 010450 030401 BIT R4,R1 seeTEST OF BIT ,cC*1000 
2843 010452 001401 BEQ 1$ sERROR IF EQ O 
2844 010454 100401 BMI es sBRANCH IF GOOD 
2845 010456 104001 1$: ERROR ol 3;CPU ERROR 
2846 ;CC SHOULD = 1000 
2847 010460 020401 2s: CMP R4,R1 seTEST 100000- 125252725252 
2848 010462 001402 BEQ 3$ sERROR IF EQUAL O 
2849 010464 103001 BCC 38 sERROR IF CARRY CLEARED 
2850 010466 100401 BMI 4$ sBRANCH IF GOOD 
2851 010470 104001 38; ERROR el 3CPuU ERROR 
2852 3CC SHOULD = 0010 
2853 010472 020104 4$; cmp R1,R4 3125252 -100000 « 25252 
2854 010474 001403 BEQ 5$ sERROR IF EQUAL 
2855 010476 103402 BCS 5$ sERROR IF CARRY 
2856 010500 102401 BvS . S$ sERROR IF OVERFLOW 
2857 010502 100001 BPL 6$ 6 ;BRANCH IF GOOD 
2858 010504 104001 58; ERROR ol ;CPU ERROR 
2859 3CC SHOULD =COO1 
2860 010506 005004 63: CLR R4 
2861 010510 005204 INC R4 3R4-1 
2862 010512 000277 scc 
2863 010514 030401 BIT R4,R1 sR4 ¢* RL = 
2864 019516 001401 BEG BS sBRANCH IF GOOD 
2865 010520 104001 7$: ERROR ol ;CPU ERROR 
2866 3CC SHOULD + O101 
2867 010522 BS: 
2868 
2369 3 
287 010522 MM11; 


COKRDABO KDGLL B CLUSTER MACT11 5001046) 
COKDAB P11 OS APR -84 16:45 


cbie 
2873 010522 012704 000400 
2874 010526 012701 000402 


3880 010544 012703 000405 


2897 010604 105213 
2898 010606 001375 


2900 010610 005002 
2901 010612 111102 
2902 C€10614 100005 
2903 010616 102404 
2904 010620 103403 
2905 010622 022702 177777 
2906 010626 001401 


2909 010630 104001 


2916 010632 012704 000400 
2917 010636 012701 000402 
2918 010642 012714 177753 
2919 610646 012711 000024 


D' 

-) 

05 APR 84 16;45 PAGE 56 

eeeeeececeacs DOUBLE OPERAND TESTS eeecensencesacees 


: TEST MOV, MOVB MODE 1,1 AND SIGN EXT ON MOVB TO GPR 
MOV #400 ,R4 3R4*400 
MOV 0402 ,R1 3R1 "402 
CLR (R4) : 
COM (RG) :400=-1 
CLR (R1) ’ 
COMB (R1) 34022000 377 
CLR R2 3R2°0 
MOV 0405,R5 3R3=405 
scc sCC#1111 
MOV (R4),CR2) sMOV 400 T0 0 ,0=-1 
BEQ 1$ sERROR IF O 
BvS 1$ sERROR IF OVERFLOW 
BCC 1$ sERROR IF NO CARRY 
BMI es sBRANCH IF GOOD 
1$: ERROR ol sCPU ERROR 
3CC SHOULD *1001 
2s: INC (R2) 30*0 
BNE 3$ sERROR IF NOT O 
ccc :CC =0000 
MOVB CR1),CR3) 3405*377 
BEQ 3$ sERROR IF EQUAL 
BMI 43 ;BRANCH IF GOOD 
3$: ERROR ol 3CPU ERROR 
; 
4s: INCB (R3) 340520 


sERROR IF 405 NOT O 


BNE 3$ 
3 CHECK — SIGN © peatenree OCCURS ON A MOVB TO GENERAL REGISTER. 


sINIT R2 TO ZERO. 


MOVB (R1),R2 sMOVE 377 TO R2 


BPL S$ sERROR! BIT 15 SHOULD BE SET. 
BVS 5$ 3V BIT SHOULD BE CLEARED 

BCS S$ sCARRY BIT SHOULD BE UNAFFECTED 
CMP 0177777,R2 sTEST R2 


BEQ 6$ 3SIGN EXTENDED THROUGH UPPER BYTE 
;ERROR! BYTE SHOULD HAVE 
3SIGN EXTENDED THROUGH UPPER BrTE 


S$; ERROR ol 3;CPU ERROR 
63: 
t 
MALL: 
: TEST ADD MODE 1,1 
MOV #400 ,R4 ;R4=2400 
MV 0402.R1 3R1=402 
t 9-25,(R4) 3400=-25 
Muv $24,(P*, 3402+24 
ADD CR1),\ Ra) 3-25+24s-1 
BEQ 1$ sERROR IF O 
BCS 1$ sERROR IF CARRY 
BPL 1$ sERROR If POSITIVE RESULT 
INC (R4) s-lel=0 
BEQ 2s ;BRANCH IF GOOD 
1$; ERROR ol 3;CPU ERROR 


sCC SHOULD + 1000 


SEQ 9055 


COKRDABO KDJLL 8 CLUSTER MACYLIL 5001046) 
PL 


COKDAaB 


010670 


0106 70 


010722 


010724 
010726 


010730 


010730 
010734 
010740 
010744 
010750 
010752 
010754 
010756 


010760 
010762 
010764 


010766 
010770 
010772 
010774 
010776 


011000 
011002 
011004 
011006 


011010 


011010 


011010 
011014 


O05 - APR -84 


012704 
012701 
012714 
O1le711 
000277 
161411 
001402 
100401 
103001 
104001 


161411 
001375 


012704 
012701 
012714 
012711 
051411 
001401 
100401 
104001 


005211 
001401 
104001 


005311 
041411 
001401 
100401 
104001 


005111 
041114 
001401 
104001 


012704 
012714 


16:45 


000400 
000402 
052525 
125252 


000400 
052525 


ES 


OS APR 84 16:45 PAGE 5 
eeeeeeseseos DOUBLE OCERAO TESTS eeeeesesseseeseses 


es: 


18; 
2s: 


1$; 


4$: 


TEST SUB MODE 1,1 


MOV #400 ,R4 3R4=400 
MOV 0404 ,R1 3R1*404 
MOV @3,(R4) 3400<3 
MOV 06,(R1) 3406*6 
scc sCC*1111 
SUB (R4),(R1) 36-323 
BEQ 1$ sERROR IF O 
BMI 1$ sERROR IF MINUS 
BCC es sBRANCH IF GOOD 
ERROR +l sCPU ERROR 
sCC SHOULD = 0000 
SUB (R4),(R1) 33-3-0 
BNE 1$ sERROR IF NOT O 


TEST BIC, BIS MODE 1,1 


MOV @400,R4 ;R4=400 
MOV 0402 .R1 3R1=402 
MOV 0052525,(R4) 3400052525 
MOV ©125252,(R1) 402125252 
BIS (R4),(R1) sRA VR = -1 
BEQ 18 sERROR IF O 
BMI _— 2 ;BRANCH IF GOOD 
ERROR +1 :CPU ERROR 
:CC SHOULD = 1000 
INC (R1) 3402+0 
BEQ 4s :BRANCH IF GOOD 
ERROR +1 :CPU ERROR 
:CC SHOULD = 0100 
DEC (R1) 3402+ -1 
BIC (R4),C(R1) 3R1=125252 
BEQ 5$ ;ERROR IF 0 
BMI 6$ ;BRANCH IF GOOD 
ERROR +1 :CPU ERROR 
:CC SHOULD = 1000 
CoM (R1) 14020052525 
BIC (RL), CRO) :400+0 
BEQ R$ ;BRANCH IF GOOD 
ERROR «1 ;CPU ERROR 


:CC SHOULD = 0100 


TEST BIT, CMP MODE 1,1 
MOV 9400 ,R4 ;R4=400 
MOV 9052525, (R4) 3400 -052525 


SEQ 0056 


COKDABO KDJ11-B8 CLUSTER MACY11 30( 1046) 


COKDAB.P11 OS-APR-84 16:45 


011020 
011024 
011030 
011032 
011034 
011036 
011040 


011042 
011044 
011046 
011050 
011052 
011054 


011056 
011060 
011062 
011064 
011066 


011070 


011070 


011070 
011074 
011100 
011104 
011106 
011110 
011112 
011114 
011116 
011120 
011122 
011124 
011126 
011130 


011132 
011134 
011136 
011140 


011142 


011142 


011142 
011146 


012701 
012711 
000241 
031411 
103401 
001401 
104001 


021411 
001403 
103002 
102001 
100401 
104001 


005014 
005214 
031114 
001401 
104001 


005244 


061411 
001401 
104001 


012704 
012701 


000402 
125252 


000400 
000402 
000005 


000400 
000402 


OS - APR -84 


16:45 PAGE 58 


FS 


eeeeeeeeneeee DOUBLE OPERAND TESTS seeeeaseeesensense 


1$: 


#402 ,R1 


#125252,(R1) 


(R4),(CR1) 
1$ 


es 
+1 


(R4),(R1) 
$ 


(R1),(R4) 
6$ 
+1 


TEST MOV MODE 2,2 
MOV #400 ,R4 


#402,R1 
#5,(R4) 
(R1)+ 
(R1) 
(R1) 
-(R1) 


CR1)+,CR4O)> 
1$ 


sR1-402 
3402*125252 
sCLEAR CARRY 
s##052525t125252-0 
sERROR IF CARRY 
sBRANCH IF GOOD 
sCPU ERROR 
sCC SHOULD = 0100 
3400 -402=125253 
sERROR IF ZERO 
sERROR IF NO CARRY 
sERROR IF NO OVERFLOW 
sBRANCH IF GOOD 
;CPU ERROR 
:CC SHOULD = 1000 


3400-1 
3125252t1-0 
sBRANCH IF GOOD 
:CPU ERROR 
:CC SHOULD= 0100 


3R4=400 
3R1=402 
3400=5 
3402-0 


: 

3404=-1 

3R1=402 

3CC=1111 

3400-0 R42402 R1=404 
sERROR IF MINUS 
sERROR IF NO CARRY 
;ERROR IF OVERFLOW 
;BRANCH IF GOOD 

;CPU ERROR 


sCC SHOULD= 0101 


-(R4) 


. CR4), CRI) 
4$ 


+l 


3400-1 R4&+400 


g2% = =@ 
;BRANCH IF GOCD 
;CPU ERROR 


3CC SHOULD = 0100 


TEST SUB MODE 2,2 


MOV 
MOV 


#400 ,R4 
0402,R1 


3R4=400 
3R1 “402 


COKDABO KDJ11 8 Ovens 
COKDAB.P11 05 - APR -84 


011152 
011156 
011162 
011164 
011166 
011170 
011172 
011174 


011176 
011200 
011204 
011206 
011210 


O1lel2 


012714 
012711 
162421 
001403 
102402 


Oll212 


011212 
011216 


011270 
011272 
011274 


011276 
011300 


011300 


011300 
011304 
011310 
011314 
011320 
011324 


012704 
012701 
012714 
012721 
012711 
005741 


MACY11 30( 1046) 
16:45 


177760 
177750 


177771 


177777 


05 - APR -84 


GO 


60000008006 DOUBLE OPERAND TESTS seeeeeesseeseneere 


1$: 


16:45 PAGE 59 
MOV #177760,(R4) 
MOV #177750,(R1) 
SUB (R4)+,(R1)> 
BEQ 1$ 
BVS 1$ 
BCC 1$ 
BMI es 
ERROR +l 
INC -(R1) 
SUB #177771,(R1)> 
BMI 3$ 
BEQ 4$ 
ERROR +1 


3400-177760 
3402+177750 
3R1*177770 
sERROR IF ZERO 
sERROR IF OVERFLOW 
;ERROR IF NO CARRY 
sBRANCH IF GOOD 
sCPU ERROR 
;CC SHOULD=1000 
3R1*1777771 
3R1=0 
;ERROR IF MINUS 
sBRANCH IF GOOD 
;CPU ERROR 
sCCSHOULD = 0100 


TEST ee BIS, BISB MODE 2,2 


MOV 00,R 3R4=400 

MOV #402,R1 3R1=402 

MOV 0404 ,R2 3R2=404 

MOV 0141401, C(R4) 3400303 001 

MOV #177405,(R1) 3402=377 005 

MOV 070, (R2)+ 3404=2070 

MOV @-1,(R2)> 3406=-1 

BIC CR4)+,CR1)+ 3402=074004 

BEQ 1$ sERROR IF ZERO 

BPL es sBRANCH IF GOOD 
sCC SHOULD = 1000 

ERROR +1 sCPU ERROR 

BIS (R4)+,CR1)> 3404=074074 

BICB (R4)+,CR1L)> 3406-074 

DEC R1 3R4=405 R1=406 

BISB (R4)+,CR1)> 3406=-1 R4=406 R1=407 

BMI as sBRANCH IF GOOD 
3406 SHOULD=-1 

ERROR +1 ;CPU ERROR 

INC (R4) 3406 SHOULD =0 

BEQ 6$ sBRANCH IF GOOD 
sERROR! 406 NE O 

ERROR +l ;CPU ERROR 

TEST BIT, CMP MODE 2,2 

MOV #400 ,R4 3R4=400 

MOV #402 ,R1 3R1=402 

MOV #125252, (R4) 3400 +125252 

MOV #100001,(R1)-+ :402=100001 

MOV #100002, (R1) 3404 «100002 

TST (R1) 3R1=402 


HS 


COKDABO KDI11 B SS MACY11 30(1046) O5-APR-84 16:45 PAGE 60 
COKDAB.P11 05 -APR-84 16:45 eeeeeeseeeee DOUBLE OPERAND TESTS seeesessseccecsens SEQ 0059 
3096 011326 132421 BITB (R4)+,(R1L)> s#¢ANDED RESULT= 000 
3097 011330 100401 BMI 1$ ;ERROR IF MINUS 
3098 011332 001401 BEQ 2s sBRANCH IF GOOD 
3099 011334 104001 1$: ERROR ol ;CPU ERROR 
3100 :CC SHOULD = 0100 
3101 011336 132124 2s: BITB CR1)+,CR4)> 3#@ ANDED RESULT = 200 
3102 011340 001401 BEQ 3$ sERROR IF EQUAL 
3103 011342 100401 BMI 4s sBRANCH IF GOOD 
3104 011344 104001 3$: ERROR ol ;CPU ERROR 
3105 :CC SHOULD= 1000 R4*402 R1=404 
3106 011346 022421 4$: CMP (R4O)+, CRI)» sRESULT #61 
3107 011350 001402 BEQ 5$ sERROR IF EQUAL 
3108 011352 103001 BCC 5$ sERROR IF NO CARRY 
3109 011354 100401 BMI 6$ s;BRANCH IF GOOD 
3110 011356 104001 S$: ERROR ol ;CPU ERROR 
$111 :CC SHOULD = 0000 
3ll2 011360 005341 6$: DEC -(R1) 3404=100001 
3113 011362 005741 TST -(R1) 3R4=2404 R1=402 
3114 011364 022124 CMP (R1)+,CR4O)- sRESULT =O 
3115 011366 001401 BEQ 8s ;BRANCH IF GOOD 
3116 sCC SHOULD = 0100 R1=404 R4=406 
3117 011370 104001 7$: ERROR ol ;CPU ERROR 
3118 011372 8$: 
3119 
3120 3 
3121 011372 MS33 
3122 
3123 3 TEST | — 3,3 
3124 011372 CLR 3R4-0 
3125 011374 012701 000002 MOV 02.R1 sR1=2 
3126 011400 012702 000400 MOV #400 ,R2 3R2=400 
3127 011404 012714 000400 MOV 400,(R4) 30=400 
3128 011410 012711 000402 MOV #402,(R1) 327402 
3129 011414 012722 000200 MOV 9200,(R2)-> 3400=200 
3130 011420 012712 054320 MOV $54320,(R2) 3402754320 
3131 011424 163431 SUB AC R4)+, aC R1 )> 354320 - 200=54120 
3132 011426 001402 BEQ 1$ sERROR IF ZERO 
3133 011430 103401 BcSs 1$ sERROR IF CARRY 
3134 011432 100001 BPL 2s ;BRANCH IF GOOD 
3135 011434 104001 1$: ERROR +1 ;CPU ERROR 
3136 3CC SHOULD =0001 
3137 011436 022712 054120 2s: CMP 54120,(R2) 3: TEST R& AUTO-INC AND RESULT 
3138 011442 001401 BEQ 4$ ;BRANCH IF GOOD 
3139 011444 104001 3$: ERROR +1 ;CPU ERROR 
3140 ;CC SHOULD = 0100 R4&=2 Ri=4 
3141 011446 005067 166326 4$; CLR (@) sRESTORE VECTORS 
aan 011452 005067 166324 CLR 2 3 a 
3144 
3145 3 
3146 011456 MCB44; 
3147 
3148 ; TEST CMP, BIT MODE 4,4 
3149 011456 012704 000400 MOV #400 ,R4 3R4=400 
3150 011462 012701 000402 MOV 402 ,R1 3R1=402 
3151 011466 012721 125366 MOV #125366,(R1)-+ 3402+125366 R1=404 


COKDABO KDJ11-8 CLUSTER MACY11 30( 1046) 
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011472 
011476 
011500 
011502 


011504 
011506 
011510 
011512 
011514 
011516 
011520 


011522 
011524 
011526 
011530 
011532 


011534 
011536 


011536 


011576 
011600 
011604 
011606 
011610 


011612 


011612 


012724 
024441 
103401 


OS-APR-84 16:45 


173001 


000004 


. 


05 - APR - 


MB66: 


TS 


84 16:45 PAGE 61 
eeeeeeeeeese DOUBLE OPERAND TESTS seeseseeesscacees 


#1735001,(R4)+ 
-€R4), -CR1L) 
1$ 

es 


-(R1L), -(R4) 
3$ 
4$ 


+1 
CR4)> 


R1 
-C(R4), -C(R1) 
6$ 


+1 


TEST ADD MODE 5,5 
V #400 ,R4 


MO ° 

MOV @1,(R4)-> 

MOV @-2,(R4)> 

MOV @400,(R4)- 
MOV #402,(R4) 

MOV #410,R1 

ADD @-(R4),8-(R1) 
BEQ 1$ 

BPL 1$ 

BCC 2s 

ERROR +1 

ADD 04,R4 

ADD @-(R1),a-C(R4) 
BEQ 4$ 

ERROR +1 


TEST BIT, BITB MODE 6,6 


3400*175001 R4=402 
3173001 - 125366045603 CC-=0000 


3B8AD COMPARE 
;CPU ERROR 


3R1=403 

3SET CARRY 

317310 

3C SHOULD REMAIN SET 

sBRANCH IF GOOD 

s INCORRECT COMPARE R4&=400 R1-402 
;CPU ERROR 

3R4=402 

3R1*403 

3173 - 173-0 

sBRANCH IF GOOD 

3BAD COMPARE 
;CPU ERROR 


340071 
3402=-2 
3404 =400 
3:406=402 R4=406 
3R1=410 
sle -2+ -1 
sERROR IF ZERO 
sERROR IF PLUS 
sBRANCH IF GOOD 
;CPU ERROR 
;B8AD ADD 
3R4=410 
a-i «ef = @ 
sBRANCH IF GOOD 
;CPU ERROR 
:CC SHOULD= 0100 R4=406 R1=400 
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3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 


011612 


011722 


011724 
011726 
011734 
011736 


011740 
011744 


011750 


011750 
011754 
011756 
011760 
011762 
011764 
011770 
011772 


011774 
012000 
012002 


OS - APR -84 


005004 
012701 
012721 
012721 
012721 
036461 
001401 


104001 
136461 
001401 
100401 


104001 


012704 
000277 
006104 
102004 
103003 
022704 
001401 
104001 


012704 
000257 
106104 


16:45 


000400 
177776 


177372 


177777 


166034 
166032 


125252 


052525 


125252 


177774 


177772 


000403 


177776 


05 - APR - 84 


16:45 PAGE 6 
eeeeesaseace DOUBLE OPER TESTS eeeeseseeeseeeesse 
CLR R4 3R4-0 
MOV #400 ,R1 H 
MOV #125252,(R1)> 3400-125252 
MOV @1,(RL)+ 3402-1 
MOV #100000,(R1)>+ 3404=1000000 R1=406 
BIT 400(R4), -4(R1) 3€400)t( 402 )=0 
BEQ es sBRANCH IF GOOD 
3CC SHOULD = 0100 
ERROR +1 ;CPU ERROR 
BITB 405(R4), -6(R1) 3€405 )*( 400 )=200 
BEQ 3$ sERROR IF ZERO 
BMI 4$ sBRANCH IF GOOD 
sCC SHOULD = 1000 
ERROR +l ;CPU ERROR 
TEST SUB MODE 7,7 
MOV #400 ,R4 : 
CLR R1 
MOV #-2,(R4)>+ 3400=-2 
MOV #-1,0R4)- 3402=-1 
MOV #400,(R4)> 3404-400 R4=406 
MOV #402,(R1) 30=402 
INC R1 sR1i=1 
SUB 8-406(R4),8403(R1) s-e - -1 = -1 
BEQ 1$ sERROR IF ZERO 
BMI es sBRANCH IF GOOD 
;CC SHOULD=1000 
ERROR +l ;CPU ERROR 
SUB @-1(R1),8-20R4) s-1 - -1 290 
BEG 4$ ;BRANCH IF GOOD 
ERROR +1 ;CPU ERROR 
sERROR ON SUBTRACT 400-0 
CLR 0 sRESTORE VECTORS 
CLR 2 : ‘ 


3 
MRLO: 


1$: 
2s: 


TEST ROL, ROLB MODE O 


#125252 ,R4 


R4 
1s 


1$ 
#052525 ,R4 
es 
+1 
#125252 ,R4 
R4a 


3R4=125252 
sCC=1111 
3R4=052525 WITH CARRY SET 
sERROR IF v CLEAR 
sERROR IF CARRY CLEAR 
;SEE IF RO = EXPECTED 
sERROR IF R4& NE EXPECTO 
;CPuU ERROR 
sROL FAILED, CC SHOWD-0011 
3R4=125252 
3CC=0000 
sROTATE EVEN BYTE 


SEQ 0061 


KS 
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COKDAB.P11 eeeeeeeee0e@ DOUBLE OPERAND TESTS eesesseseeneseses SEQ 9062 
3264 012004 103005 BCC 3$ ;ERROR IF NO CARRY 
3265 012006 102004 BvC 3$ sERROR IF NO OVERFLOW 
3266 012010 100403 BMI 3$ sERROR IF MINUS 
3207 012012 022704 125124 CMP #125124,R4 ;SEE IF R&@ = EXPECTED 
3268 012016 001401 BEQ 4$ ;BRANCH IF GOOD 
269 012020 104001 3$: ERROR +1 ;CPU ERROR 
3270 ;ROLB FAILED, CC SHOULD=1011, R4=125125 
3271 012022 4$: 
8272 
32753 8 
3274 012022 MRLB1: 
8275 
3276 3 TEST ROL, ROLB MODE 1 
3277 012022 005004 CLR Ra 3R4-0 
3278 012024 012714 052525 MOV #52525,(R4) 30=52525 
3279 012030 006114 ROL (R4) s#eTEST INSTRUCTION, 0-125252 
3280 012032 100005 BPL 1$ sERROR IF PLUS 
3281 012034 102004 BvC 1$ sERROR IF NO OVERFLOW 
3282 012036 103403 BCS 1$ sERROR IF CARRY 
3283 012040 021427 125252 CMP (R44), 4125252 ;SEE IF R4&=EXPECTED 
3284 012044 001401 BEG es ;BRANCH IF GOOD 
3285 sBAD ROL ,CC SHOULD=1010 
3286 012046 104001 1$: ERROR +1 ;CPU ERROR 
3287 012050 012714 125252 2s: MOV #125252, (R4) 30=125252 
3288 012054 005204 INC R4 3R4=1 
3289 012056 000277 scc :CC=1111 
3290 012060 106114 ROLB (R4) s@eTEST INSTRUCTION 
3291 012062 100406 BMI 3$ sERROR IF RESULT IS POSITIVE 
3292 012064 103005 BCC 3$ ;ERROR IF NO CARRY 
3293 012066 102004 BvCc 3$ sERROR IF Vv CLEAR 
3294 012070 005304 DEC R4 3R4=0 
3295 012072 022714 052652 CMP #52652 ,(R4) sERROR IF O NE EXPECTED 
3296 012076 001401 BEQ 4$ sBRANCH IF GOOD 
3297 012100 104001 3$: ERROR +1 ;CPU ERROR 
3298 :;B8AD ROLB ODD BrYTE,CC SHOULD=-1011 
3299 012102 4$: 
3300 
3301 ; 
3302 012102 MRL2: 
3303 
3304 3 TEST ROL, ROLB MODE 2 
3305 012102 005004 CLR R4 3R4=0 
3306 012104 012714 100000 MOV #100000 ,(R4) 302100000 
3307 012110 000257 ccc 3CC =0000 
3308 012112 006124 ROL (R4&)-> ;*TEST INSTRUCTION 
3309 012114 103002 BCC 1$ sERROR IF NO CARRY 
3310 012116 102001 BvC 1$ sERROR IF NO OVERFLOW 
3311 012120 001401 BEQ es ;BRANCH IF GOOD 
3312 sROL FAILED ,CCSHOULD= 0100 
3313 012122 104001 13%: ERROR el ;CPU ERROR 
3314 012124 005304 2s: DEC R4 
3315 012126 005304 DEC R4 
3316 012130 001012 BNE 3$ ;ERROR IN AUTO-DEC 
3317 012132 012714 004040 MOV #4040,(R4) 30-4040 
3318 012136 000241 CLC 


3319 012140 106124 ROLB (R4)+ ;¢eTEST INSTURCTION 


. = 
ad 
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012142 
012144 
012146 
012150 
012154 
012156 


012160 


012160 


012160 
012162 
012166 
012170 
012174 
012176 
012200 
012202 
012206 


012210 
012212 
012216 
012220 
012224 
012226 
012230 
012232 


012234 


012234 


012234 
012236 
012242 


012270 


012272 
012274 


012274 


004100 


052525 
125253 


125252 
000000 


000002 
054321 


130643 


O05 APR-84 16:45 
BCS 3$ 
BVS 3$ 
DEC RG 
CMP #04100, (R4) 
BEQ 4$ 
3$; ERROR +l 
4$: 
; 
MRL 3 
3 TEST ROL, ROLB MODE 3 
CLR R4 
MOV #052525, (R4) 
scc 
ROL ae0 
BPL 1$ 
BvCc 1$ 
BCS 
CMP #125253, (R4) 
BEQ 
1$: ERROR 
2s: MOV #125252,(R4) 
SEC 
ROLB a0 
BMI 3$ 
BCC 3$ 
BvS 4$ 
3$ FRROR ol 
4$: 
; 
MRL4: 
; TEST ROL MODE 4 
CLR R1 
MOV @2,R4 
MOV #54321,(R1) 
scc 
ROL (R4) 
BPL 1$ 
BYVC 1% 
BCS 1$ 
CMP #1350643,(R1) 
BNE 1$ 
TST R4 
BEQ es 
18; ERROR +1 
2s; 
; 
MMRL Ss 


sERROR IF CARRY SET 
sERROR IF V 


3;SEE IF O= EXPECTED RESULT 
;BRANCH IF GOOD 

;CPU ERROR 

;BAD ROL 


pasTEST INSRUCTION MODE 3 WITH PC 
sERROR IF PLUS 

sERROR IF NO OVERFLOW 

sERROR IF CARRY 

sCOMPARE RESULT WITH EXPECTED 
sBRANCH IF GOOD 

;BAD ROL CC SHOULD-1010 


;CPU ERROR 
307125252 
;CC=---1 


:*#eTEST INSTRUCTION 
sERROR IF MINUS 
sERROR IF NO CARRY 
;BRANCH IF OVERFLOW 
;CPU ERROR 
3BAD ROL, CC SHOULD-1011 


;R1=0 

3R4=2 

30=54321 

:CC#1111 

3*¢TEST INSTRUCTION 
sERROR IF PLUS 

;ERROR IF NO OVERFLOW 
sERROR IF CARRY 

3;SEE IF EXPECTED RESULT 
;BRANCH IF ROL FAILED 
sSEE IF AUTO-DEC WORKED 
;BRANCH IF GOOD 

;ERROR! BAD ROL INST 
;CPU ERROR 


COKDABO 


COKDAB 


Pll 


012274 
012276 
012302 
012306 
012310 
012312 
012314 
012316 
012320 
012322 
012324 
012332 


012334 
012336 


012336 


012336 
012342 
012344 
012350 
012352 
012356 
012360 
012362 
012364 
012370 


012372 
012374 


012374 


012374 
012400 
012404 
012412 
012416 
012420 
012422 
012424 
012426 
012432 


012434 
012436 


012436 
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000400 
123456 


047135 


000400 
032525 
177400 


065253 


000000 


000000 


MS 
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aeeeeee0e008 DOUBLE OPERAND TESTS eeeeessesteenseeee 


1$: 
2s: 


3 
MSW37: 


TEST ROL MODE 5 
R4 


CLR 

MOV #400 ,(R4) 
MOV #123456, 8(R4)-+ 
scc 

ROL @-C(R4) 

BMI 1$ 

BCC 1$ 

Bvc 1$ 

TST R4 

BNE 1$ 

CMP #47135,80400 
BEQ es 

ERROR +l 


TEST ROL MODE 6 


MOV #400 ,R4 

CLR R1 

MOV #32525,(R1) 
scc 

ROL -400(R4 ) 
BMI 1$ 

BCS 1$ 

BVS 1$ 

CMP 965253,(R1) 
BEQ es 

ERROR +1 


MOV #400 ,R4 
CLR 8402 
MOV #100000 , #0 
ROL @2(R4) 
BMI 1$ 

BNE 1$ 

Bcc 1$ 

BvC is 

TST a0 
BEQ es 
ERROR +1 


3;R4=0 

30=400 

3400=123465, R4=2 
;CC=#1111 

;#eTEST INSTRUCTION 


;ERROR IF RESULT IS MINUS 


sERROR IF NO CARRY 
sERROR IF NO OVERFLOW 


;SEE IF AUTO-DEC WORKED 


sERROR OF AUTO-DEC 


;SEE IF CORRECT RESULT 


;BRANCH IF GOOD 
;BAD ROL MODE 5 


;CPU ERROR 


;R4=400 
3R1=0 
30732525 


;#eTEST INSTRUCTION 
s;ERROR IF MINUS 

s;ERROR IF CARRY 

sERROR IF OVERFLOW 
;SEE IF CORRECT RESULT 
s;BRANCH IF GOOD 

;BAD ROL MODE 6 


;CPU ERROR 


3;R4=400 

340270 

302100000 

3;@eTEST INSTRUCTION 
;ERROR IF MINUS 
;ERROR IF NOT ZERO 
;ERROR IF NO CARRY 
;ERROR IF NO OVERFLOW 
;CHECK RESULT 
sBRANCH IF GOOD 
;BAD ROL MODE 7 


;ChU ERROR 


SEQ 0064 


NS 
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012436 
012442 
012446 
012452 
012454 
012460 
012462 
012466 


012470 
012472 


012472 


012472 
012476 
012500 
012502 
012504 
012510 


012512 
012514 
012514 


012514 
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012737 
012701 
000111 
023727 
001401 


104001 


000400 
040700 
000400 
140101 


000400 


052525 


025252 


000001 005032 
012614 


003032 000002 


OOOO REHEDE DOUBLE OPERAND TESTS seeeeesseeseeeees 


MJUe: 


1$: 


TEST SWAB oy F 37 
MOV 


#400 ,R 
MOV 240700, (R4) 
SWAB 8¢400 
BMI 1$ 
CMP #140101,(R4) 
BNE 1$ 
SWAB 84400 
BMI es 
ERROR +1 
TEST ROR MODE O 
MOV 052505, R4 
ccc 
ROR Ra 
BCC 1$ 
CMP #25252 ,R4 
BEQ 2s 
ERROR 1 


TEST RORB MODE 1 


CLR R4 

MOV @1,(R4) 
scc 

RORB (R4) 

BCC 1$ 

BPL $ 

CMP #200,(R4) 
BEQ $ 

ERROR ol 


TEST JMP - ALL MODES 


MOV #1,@0SEQ 
MOV OMJU1L,R1 
JMP (R1) 

CMP @0SEQ, a2 
BEG MJU2A 
ERROR “1 


sERROR IF MINUS 


sSEE IF EXPECTED RESULT 


;BRANCH IF BAD 
3400-101 300 
sBRANCH IF GOOD 


s;ERROR! BAD SWAB MCDE 37 


;CPU ERROR 


3R42=52525 
;CC=0000 


3R4 SHOULD = 25252 WITH CARRY 


sERROR IF NO CARRY 
;SEE IF R4= EXPECTED 
ROR tO IF GOOD 
ROR MODE O FAILED 
3CPU ERROR 


3R4=0 
3071 
3CC-1112 
:0=000200, NO C 
;ERROR IF NO CARRY 
sERROR IF PLUS 
;CHECK RESULT 
;BRANCH IF GOOD 
;CPU ERROR 
;BAD RESULT 


sSETUP TEST SEQUENCER 


3SET MODE .. JUMP ADDRESS 


3;¢JMP MODE 


sCHECK FOR Correct SE QUE NCE 


;BRANCH IF GOOD 
Fy e JUMP FAILED 
;CPU ERROR 


> | y 
aia 
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COKDAB.P 11 O05 APR -84 16:45 eeoeeceeoeeos DOUBLE OPERAND TESTS eecescesecscosoes SEQ 0066, 
8488 012570 O20127 012560 MJU2ZA; CMP R1, @MJV2 +2 sCHECK FOR AUTO INCREMENT 
3489 012574 001401 BEQ MJU2B sBRANCH IF GOOD 
3490 012576 104001 os: ERROR ol sCPU ERROR 
349) sAUTO-INCR FAILED 
3492 012600 005237 003032 MJU2B: INC @oSEQ sUPDATE TEST SEQUENCER 
3493 012604 012701 Ol261le MOV omMJ2 ,R1 sSETUP MODE 3 JUMP 
3494 012610 000131 JMP OCR1)-> 3 JUMP MODE 3 
3495 012612 012640 MJe: . WORD MJU3 sMODEO 3 DETIPATION 
8496 012614 023727 0030382 O00001 MUJUL: CMP @OSEQ, 1 s TEST FOR CORRECT SEQUENCE 
3497 012622 001401 BEQ MJULA sBRANCH IF GOOD 
3498 01c624 104001 33; ERROR ol sCPU ERROR 
3499 sJMP OUT OF SEQUENCE 
3500 012626 005237 003032 MJULA;: INC BOSEQ sUPDATE SEQUENCE 
3501 012632 012701 012556 MOV OMJU2 ,R1 sSETUP MODE 2 DESTINATION 
3502 012636 000121 JMP (R1)- 3 JUMP MODE 2 
3503 012660 023727 003032 O000038 MuU3: CMP G0SEQ, 03 3 TEST FOR CORRECT SEQUENCE 
3504 012646 001401 BEQ MJU3A sBRANCH IF GOOD 
3505 012650 104001 43: ERROR ol 3CPU ERROR 
3506 3JMP OUT OF SEQUENCE 
3507 012652 022701 012614 MJU3A; CMP OMJ2+2,Ri 3s TEST AUTO-INCREMENT 
3508 012656 001401 BEQ MJU3B sBRANCH IF GOOD 
3509 012660 104001 S$: ERROR ol :CPU ERROR 
3510 sAUTO-INCREMENT FAILED MODE 3 
3511 012662 005237 003032 MJU3B: INC aesSEea sUPDATE SEQUENCER 
3512 012666 012701 012736 MOV OMJU4 +2,R1 sSETUP DESTINATION MODE 4 
3513 012672 000141 JMP -(Ri) sEXECUTE JUMP MODE 4 
3514 012674 000000 MJUS: HALT 
3515 012676 022701 012772 CMP oM5 R11 sCHECK AUTO -DECREMENT 
35l0 012702 001401 BEQ MJUSA sBRANCH IF GOOD AVTO-DEC 
3517 012704 104001 63: ERROR ol 3CPU ERROR 
3518 sAUTO-DEC FAIELD MODE 5S 
3519 012706 023727 003032 000005 MuJUSA: CMP @0SEQ,05 3s TEST CORRECT SEQUENCE 
3520 012714 001401 BEQ MJUSB sBRANCH IF GOOD SEQUENCE 
3521 012716 104001 78; ERROR ol sCPU ERROR 
3522 3JMP OUT OF SEQUENCE 
3523 012720 005237 003032 MJUSB: INC @esea sUPDATE SEQUENCE COLIN’ 
3524 012724 012701 012767 MOV OMJU6 -5,R1 sSETUP DESTINATION MODES 
cece ©i2730 000161 000005 JMP *S(R1) 3JUMP MODE 6 

$3 
3527 012734 000240 MJU4; NOP 
3528 012736 022701 012734 CMP OMJU4 ,R1 3; TEST AUTO-DECR 
3529 012742 001401 BEQ MJUGA sBRANCH IF GOOD 
3530 012744 104001 83: ERROR ol 3CPU ERROR 
3531 sMODE 4 AUTO-DEC FAILED 
3532 012746 023727 003032 000004 MUJU4A: CMP @OSEQ, 04 : TEST FOR CORREC!Y SEQUENCE 
3533 012754 001401 BEQ M148 sBRANCH IF CORRECT SEQUENCE 
3534 012756 104001 9%: ERROR ol 3CPU ERROR 
3535 s INCORRECT JMP SEQUENCE 
3536 012760 005237 003032 MJU48; INC @esFQ sUPDATE SEQUENCE 
353” 012764 012701 012774 MOV OMI5-2,R1 sSETUP MODE 5S POINTER 
oe Ole’770 000151 JMP a-(R1) sEXECUTE MODE 5S IMP 
F 
ort) 012772 012676 MUS: WORD MJIUS 02 sPOINTER MODE 5 
i 3 
3542 012774 0227387 000006 004032 Mum: CMP 6 ,90SLQ sCHECK FOR CORRECT SEQUENCE 


754% 014002 001401 BEQ MIU6HA sBRANCH TF GOOD 


CF, 
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8544 013004 104001 108; ERROR +1 sCPU ERROR 
85485 s INCORRECT SEQUENCE 
8546 013006 0052357 003032 MJU6A; INC QOSEQ sUPDATE SEQUENCER 
3547 013012 012701 013032 MOV OMJ7+10,R1 sSETUP INDEX 
3598 013016 000171 177770 JMP 8-10(R1) sEXECUTE MODE 7 JUMP 
3549 013022 013026 MJ?; -WORD MJU7 sPOINTER FOR MODE 7 
3550 013924 000000 HALT 
3551 013026 022737 000007 003032 MUJU?7; CMP 07,80SEQ ; TEST FOR CORRECT SEQUENCE 
3552 013034 001401 BEQ MJU7E sBRANCH IF GOOD SEQUENCE 
3553 O0138C36 104001 1i$: ERROR +1 ;CPU ERROR 
3554 ; TESTING OUT OF SEQUENCE 
3555 013040 MJU7E ; 
3550 3 
355° 
3558 3 TEST THAT PRE - — BUFFER CAN BE OVER WRITTEN 
3559 013040 012701 013350 MOV #1283 ,R1 3SET UP R1 WITH ADDRESS OF ERROR 
3560 }ROUT INE 
3561 013044 012717 MOV (PC)+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3562 013046 000240 -WORD NOP sNOP INSTRUCTION 
3563 013050 000111 64%: . WORD 111 3 JMP (R1) 
3564 013052 012717 MOV (PC)+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3565 013054 000240 -WORD NOP sNOP INSTRUCTION 
3566 013056 000111 653: . WORD 111 3 JMP (R1) 
3567 013060 012717 MOV CPC )+, (PC) sWRITE THE NOP OVER THE UMP INSTRUCTION 
3568 013062 000240 -WORD NOP sNOP INSTRUCTION 
3569 013064 000111 66%: . WORD 111 3 IMP CR1L) 
3570 013066 012717 MOV (PC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3571 013070 000240 -WORD NOP sNOP seca + Hemaes 
3572 013072 000111 678: . WORD 111 3 JMP C(R1 
3573 013074 012717 MOV CPC )+, CPC) TWRITE THE Nop OVER THE JMP INSTRUCTION 
3574 013076 000240 -WORD NOP sNOP INSTRUCTION 
3575 013100 OO0111 68%: . WORD 111 3 JMP C(R1) 
$576 013102 012717 MOV (PC )+, CPC) TWRITE THE NOP OVER THE JMP INSTRUCTION 
3577 013104 0600240 «WORD NOP sNOP INSTRUCTION 
3578 013106 oOO00111 69%: . WORD lil 3 JMP (R1) 
3579 013110 012717 MOV CPC )+, (PC) sWRITE THE NOP OVER THE UMP INSTRUCTION 
3580 013112 000240 -WORD NOP sNOP INSTRUCTION 
3581 013114 000111 708; . WORD 111 3 IMP C(R1) 
3582 013116 012717 MOV CPC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3583 013120 000240 -WORD NOP sNOP INSTRUCTION 
3584 013122 000111 718: . WORD 111 3 JMP (Ri) 
3585 013124 012717 MOV (PC ++, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3586 013126 000240 .WORD NOP sNOP INSTRUCTION 
3587 013130 000111 728: . WORD 111 3 JMP C(R1) 
3588 013132 012717 MOV CPC )+, (PC) sWRITE THE NOP OVER The JMP INSTRUCTION 
3589 013134 000240 -WORD NOP sNOP INSTRUCTION 
3590 013136 000111 738: . WORD 111 3 JMP (RL) 
3591 013140 012717 MOV CPC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3592 013142 000240 -wWORD NOP sNOP INSTRUCTION 
3593 013144 000111 14$; . WORD 111 3 JMP (RI) 
3594 013146 012717 MOV (PC )+, (PC) sWRITE "HE NOP OVER THE JMP INSTRUCTION 
3595 013150 000240 -WORD NOP sNOP INSTRUCTION 
3596 013152 000111 *S$: . WORD 111 3 JMP (RL) 
S9? 013154 012717 MOV (PC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3598 013156 00024C -WORD NOP sNOP INSTRUCTION 


3599 0127160 OOC111 763: . WORD 111 3 MP (R1) 


Dé 
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8600 O13162 O12717 MOV (PC )>+, (PC) sWRITE THE NOP OVER THE JMP [INSTRUCTION 
S601 013164 000240 .WORD NOP sNOP INSTRUCTION 

3602 013166 000111 778; . WORD 111 3 IMP (R1) 

3603 013170 012717 MOV (PC)+,¢PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3604 013172 000240 -WORD NOP sNOP INSTRUCTION 

3605 013174 000111 78%: . WORD 111 3 IMP (R1) 

3006 013176 012717 MOV (PC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3607 0132 000240 «WORD NOP sNOP INSTRUCTION 

3608 013202 000111 793; . WORD 111 3 IMP (R1) 

3609 013204 012717 MOV CPC)+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3610 013206 000240 -WORD NOP sNOP INSTRUCTION 

3011 013210 000111 808: . WORD 111 3 IMP (R1) 

3612 013212 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3613 013214 000240 -WORD NOP sNOP INSTRUCTION 

3614 013216 OOO111 81%: -WORD 111 3 JMP (R1) 

3615 013220 012717 MOV CPC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3616 013222 000240 -WORD NOP sNOP INSTRUCTION 

3617 013224 OO0111 823: -WORD 111 3 JMP (R1) 

3618 013226 012717 MOV (PC )>, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3619 013230 000240 -WORD NOP sNOP INSTRUCTION 

3620 013232 000111 83%: -WORD 111 3 JMP (R1) 

3621 013234 012717 MOV (PC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3622 013236 000240 -WORD NOP sNOP INSTRUCTION 

3623 013240 000111 84%: . WORD 111 3 IMP (R11) 

3624 013242 012717 MOV (PC)+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3625 013244 000240 -WORD NOP sNOP INSTRUCTION 

3626 013246 000111 85%: . WORD 111 3 IMP (R1) 

3627 013250 012717 MOV (PC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3628 013252 000240 -WORD NOP sNOP INSTRUCTION 

3629 013254 000111 86%: . WORD lil 3 JMP CR1) 

3630 013256 012717 MOV (PC )+, CPC) ;sWRITE THE NOP OVER THE JMP INSTRUCTION 
3631 013260 000240 -WORD NOP sNOP INSTRUCTION 

3632 013262 000111 87%: . WORD 111 3 IMP (R1) 

3633 013264 012717 MOV CPC)+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3634 013266 000240 -WORD NOP sNOP INSTRUCTION 

3635 013270 OOO111 88%: . WORD 111 3 JMP (R1) 

3636 013272 012717 MOV (PC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3637 013274 000240 -WORD NOP sNOP INSTRUCTION 

3638 013276 000111 89%: . WORD 111 3 IMP CR1) 

3639 013300 012717 MOV (PC )+, CPC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3640 013302 000240 -WORD NOP sNOP INSTRUCTION 

3641 013304 000111 90$: . WORD 111 3./MP Ri) 

3642 613306 012717 MOV CPC )+, CPC) ;sWRITE THE NOP OVER THE JMP INSTRUCTION 
3643 013310 000240 -WORD NOP sNOP INSTRUCTION 

3644 013312 000111 918; . WORD 111 3 JMP 1) 

3645 013314 012717 MOV (PC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3646 013316 000240 «WORD NOP sNOP INSTRUCTION 

3647 013320 000111 92%: . WORD 111 3 IMP CR1) 

3648 013322 012717 MOV (PC)+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3649 013324 000240 -WORD NOP sNOP INSTRUCTION 

3650 013326 OO0111 93%: . WORD 111 JMP (R1) 

3651 013330 012717 MOV (PC)+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3652 013332 000240 -WORD NOP sNOP INSTRUCTION 

3653 013334 000111 943; . WORD 111 3 JMP (RL) 

3654 013336 012717 MOV (PC )+, (PC) sWRITE THE NOP OVER THE JMP INSTRUCTION 
3655 0143340 00C240 -WORD NOP sNOP INSTRUCTION 
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3 JMP (R1) 
sJUMP OVER ERROR CALL 
sERROR! PRE-FETCH BUFFER WAS NOT 
;OVER WRITTEN 
;CPU ERROR 


3 NOW RESTORE THE OVER WRITTEN JMP INSTRUCTIONS FOR THE NEXT PASS. 


TEST JMP MODES eel 


O05 APR-84 16:45 PAGE 
95%: . WORD 111 
JMP 84129% 
128%: 
ERROR ol 
3 
129%: MOV @32.,R2 
MOV 9643 ,R3 
130$: MOV 111,(R3) 
ADD 06, R3 
SOB R2,150$ 
H 
MJP; 
MOV #0, OSE 
JMP (R7) 
3 
MJP17: TST a@eSEQ 
BEQ es 
1$; ERROR ol 
2s: INC @eSEQ 
JMP 401 
H 
HALT 
3 
MJP27: CMP @6SEQ, a1 
BEQ MJP27A 
1$: ERROR ol 
MJP27A: INC aeseQ 
JMP @OMIP 37 
MJP67:; CMP @eSEG, 03 
BEQ MJP67A 
2s: ERROR el 
MJP67A: INC @eSE © 
cce 
JMP MP6 78 
3 
HALT 
; 
MJP67B: .WORD MJP7?7 
3 
MJP77; CMP QOSEQ, #4 
BEQ MJP 7 7E 
3$;: ERROR ol 
MJP37:; CMP @YSEG, #2 
BEG MJP37A 
4$: ERROR 1 


sSET UP R2 AS COUNTER 

sSET UP R3 AS POINTER 

sRESTORE OVER WRITTEN JUMPS 
sPOINT TO NEXT OVER WRITTEN ADDR. 
300 UNTIL R2-0 


sSETUP TEST SEQUNCER 
3 JUMP MODE 17(SHOULD BE IN-LINE) 


sCHECK SEQUENCE 
;BRANCH IF GOOD 
sERROR! BAD JUMP 
;CPU ERROR 
sUPDATE SEQUENCE NUMBER 
MODE 27 


3 JUMP 
3( THE @401-BR UPDATED PC-2) 
3 


sCHECK IF CORRECT SEQUENCE 
sBRANCH IF IN SEQUENCE 
;CPU ERROR 
; TEST OUT OF SEQUENCE 
sUPDATE SEQUENCER 
3JUMP MODE 37 
sCHECK FOR CORRECT SEQUENCE 
sBRANCH IF IN SEQUENCE 
;CPU ERROR 
; TEST OUT OF SEQUENCE 
sUPDATE SEQUENCER 
3 INSURE ZBIT=0 
;JUMP MODE 7 


3: TEST FOR CORRECT SEQUENCE 
sBRANCH IF IN SEQUENCE 

;CPU ERROR 

3; TEST OUT OF SEQUENCE 
s TEST FOR CORRECT SEQUENCE 
;BRANCH IF IN SEQUENCE 

;CPuU ERROR 


SEQ 0069 


ij ‘a 
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87le s TEST OUT OF SEQUENCE 
3713 013524 005237 003032 MJP37A;: INC @eseQ sUPDATE SEQUENCER 
thd 013530 000167 177714 JMP MJP67 3 JUMP MODE 6 
‘ - Hy 
3716 H 
3717 013534 MJP77E: 
3718 ; 
3719 3 
cist 013534 MJSR: 
3721 
3722 3 TEST JSR ALL MODES 
3723 013534 010637 003034 MOV R6,90SPS ;SAVE STACK POINTER LOCATION 
3724 013540 010637 003036 MOV R6,B0SPSJ Hy 
3725 013544 162737 000002 003036 SUB 02. a@0SPSJ :SPSU = R6 AFTER DECRIMENT 
37 013552 012737 000001 003032 MOV #1,90SEQ sSETUP SEQUENCE COUNTER 
3727 013560 012701 013654 MOV OMJSR1,R1 ;SETUP INITIAL JUMP IN MODE 1 
3728 013564 005004 CLR R4 ; 
3729 013566 005104 COM R4 3R4=-1 TO BE SAVED ON STACK 
hh ng 013570 004411 JSR R4,(R1) 3; JSR 1 
3 
3732 013572 022737 000002 003032 MUSR2: CMP 2,30SEQ 3 TEST FOR CORRECT SEQUENCE 
3733 013600 001401 BEQ MJSR2A ;BRANCH IF GOOD 
3734 013602 104001 S$: ERROR ol ;CPU ERROR 
3735 sMODE 2 JUMPED TO OUT OF SEQUENCE 
3736 013604 023706 003036 MJSR2A: CMP @OSPSJ,RE sVERIFY STACK DECRIMENT 
3737 013610 001006 BNE 6$ ;BRANCH IF STACK INCORRECT 
3738 013612 021627 125252 CMP (R6), 0125252 sVERIFY CONTENTS OF STACK 
3739 013616 001003 BNE 6$ sBRANCH IF DATA ON STACK INCORRECT 
3740 013620 022704 013734 CMP OMJSR4 ,R4O sSEE IF CORRECT RETURN ADDRESS 
3741 013624 001401 BEQ MJSR2B sBRANCH IF GOOD 
3742 013626 104001 6$: ERROR ol ;CPU ERROR 
3743 3JSR MODE 2 FAILED 
3744 013630 005237 003032 MJSR2B: INC a@eSEQ sUPDATE SEQUENCE COUNTER 
3745 013634 013706 003034 MOV @esPs ,R6 sRELOAD STACK POINTER 
3746 013640 012701 013652 MOV @MJSRA,R1 sSETUP JSR MODE 3 
3747 013644 005004 CLR R4 ;DIFFERENT DATA TO R4 
3748 013646 004431 JSR R4,a(R1L)> 3JSR MODE 3 
3749 013650 000000 HALT 
Beat 013652 014020 MJSRA: .WORD MJSR3 sLITERAL FOR JUMP MODE 3 
* 3 
3752 013654 022737 000001 003032 MuUSR1: CMP #1,90SEQ ; TEST FOR CORRECT SEQUENCE 
3753 013662 001401 BEQ MJSR1A ;BRANCH IF GOOD 
3754 013664 104001 7$: ERROR ol ;CPU ERROR 
3755 sMODE 1 JUMPED TO OUT OF SEQUENCE 
3756 013666 023706 003036 MJSR1A: CMP peeraa. R6 ;VERIFY STACK DECRIMENT 
3757 013672 001006 BNE s;BRANCH IF STACK INCORRECT 
3758 013674 021627 177777 CMP CR6), -1 sVERIFY CONTENT OF STACK 
3759 013700 001003 BNE 8$ sBRANCH IF DATA ON STACK INCORRECT 
3760 013702 022704 013572 CMP @MJSR2 ,R4 ;SEE IF CORRECT RETURN ADDRESS 
3761 013706 001401 BEQ MJSR1B8 sBRANCH IF GOOD 
3762 013710 104001 8S: ERROR ol ;CPU ERROR 
3763 3JSR MODE 2 FAILED 
3764 013712 005237 003032 MJSR1B: INC @eSEQ sUPDATE SEQUENCE COUNTER 
3765 013716 013706 003034 MOV @eSPs ,R6 sRELOAD STACK POINTER 
3766 013722 012704 125252 MOV #125252 ,R4 ;SETUP R4& DATA 
3767 013726 012701 013572 MOV MMJSR2 ,R1 ;SETUP MODE 2 JUMP ADDRESS 


646 
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Bag 013732 004421 JSR R4,(R1)+ 3*JUMP MODE 2 
376 : 
3770 : 
3771 013734 022737 000004 003032 MUSR4: CMP 04, 30SEQ ; TEST FOR CORRECT SEQUENCE 
3772 013742 001401 BEQ MJSR4A ;BRANCH IF GOOD 
3773 013744 104001 9$: ERROR +1 ;CPU ERROR 
3774 sMODE 4 JUMPED TO OUT OF SEQUENCE 
3775 013746 023706 003036 MJSR4A; CMP @eSPSJ,RE ;VERIFY STACK DECRIMENT 

77 013752 001006 BNE 10$ ;BRANCH IF STACK INCORRECT 

777 #013754 021627 052525 CMP (R6), #052525 sVERIFY CONTENTS OF STAACK 
377 013760 001003 BNE 10$ sBRANCH IF DATA ON STACK INCORRECT 
3779 013762 022704 014102 CMP #MJSR6 ,R4 ;SEE IF CORRECT RETURN ADDRESS 
3780 013766 001401 BEQ MJSR4B sBRANCH IF GOOD 
3781 013770 104001 10$: ERROR ol ;CPU ERROR 
3782 ;JSR MODE 4 FAILED 
3783 013772 005237 003032 MJSR4B;: INC aeSEQ ;UPDATE SEQUENCE COUNTER 
3784 013776 013706 003034 MOV QeSPs,R6E ;RELOAD STACK PCINTER 
3785 014002 012704 000377 MOV 0377,R4 ;SETUP R4 DATA 
3786 014006 012701 014020 MOV @MJSRB+2,R1 ;SETUP JSR VECTOR 
3787 014012 004451 JSR R4,a-(R1) ;JSR MODE 5S 
3788 014014 000000 HALT 
3789 014016 014166 MJSRB: .WORD MJSRS sMODE 5S VECTOR 
sr3t : 

3 

3792 014020 022737 000003 003032 MUJSR3: CMP 3,20SEQ : TEST FOR CORRECT SEQUENCE 
3793 014026 001401 BEQ MJSR3A sBRANCH IF GOOD 
3794 014030 104001 11$: ERROR +1 ;CPU ERROR 
3795 ;MODE 3 JUMPED TO OUT OF SEQUENCE 
3790 014032 023706 003036 MJSR3A: CMP aeSPSJ,R6 ;VERIFY STACK DECRIMENT 
3797 014036 001006 BNE 12$ ;BRANCH IF STACK INCORRECT 
3798 014040 021627 000000 CMP (R6), 00 sVERIFY CONTENTS OF STAACK 
3799 014044 001003 BNE 12$ sBRANCH IF DATA ON STACK INCORRECT 
3800 014046 022704 013650 CMP @MJSRA-2,R4 ;SEE IF CORRECT RETURN ADDRESS 
3801 014052 001401 BEQ MJSR3B ;BRANCH IF GOOD 
3802 014054 104001 12s: ERROR +1 ;CPU ERROR 
3803 ;JSR MODE 3 FAILED 
3804 014056 005237 003032 MJSR3B: INC aeseQa sUPDATE SEQUENCE COUNTER 
3805 014062 013706 003034 MOV @eSPs ,R6 sRELOAD STACK POINTER 
3806 014066 012704 052525 MOV #052525 ,R4 ;SETUP R4& DATA 
3807 014072 012701 013736 MOV OMJSR4+2,R1L s;SETUP JSR VECTOR 
3808 014076 000257 ccc ;CLEAR CONDITION CODES 
3809 014100 004441 JSR R4, -(R1) 3JSR MODE 4 
tr 3 

11 H 
3812 014102 022737 000006 003032 MUSR6: CMP %6,39SEQ ; TEST FOR eee SEQUENCE 
3813 014110 001401 BEQ MJSR6A ;BRANCH IF GOOD 
3814 014112 104001 13%: ERROR 1 ;CPU ERROR 
3815 sMODE 6 JUMPED TO OUT OF SEQUENCE 
3816 014114 023706 003036 MJSR6A: CMP @eSPSJ,R6 ;VERIFY STACK DECRIMENT 
3817 014120 001006 BNE 14$ sBRANCH IF STACK INCORRECT 
3818 014122 021627 123456 CMP (R6), 4123456 ;VERIFY CONTENTS OF STACK 
3819 014126 001003 BNE 14$ sBRANCH IF DATA ON STACK INCORREC! 
3820 014130 022704 014250 CMP oMJSR7,R4 3;SEE IF CORRECT RETURN ADDRESS 
3821 014134 001401 BEG MJSR6B sBRANCH IF GOOD 
3822 014136 104001 14%: ERROR ol ;CPU ERROR 


3823 ;JSR MODE 6 FAILED 


H6 
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8824 014140 005237 003032 MJSR6B: INC @eSEQ sUPDATE SEQUENCE COUNTER 
3825 6014144 013706 003034 MOV @eSPS ,R6 sRELOAD STACK POINTER 
3826 «6014150 012704 177773 MOV @-5,R4 ;SETUP R4 DATA 
3827 014154 012701 014174 MOV @MJSRC:10,R1 ;SETUP JSR VECTOR 
3828 014160 004471 177770 JSR R4,8-10(R1) 3JSR MODE 7 
3829 014164 014250 MJSRC: .WORD MJSR7 sJSR VECTOR 
3831 
1 H 
3832 014166 022737 000005 003032 MUSRS: CMP 5, a¢@SEQ s TEST FOR CORRECT SEQUENCE 
3833 014174 001401 BEQ MJSRSA sBRANCH IF GOOD 
3834 014176 104001 15$: ERROR +1 ;CPU ERROR 
3835 sMODE S JUMPED TO OUT OF SEQUENCE 
3836 014200 023706 003036 MJSRSA: CMP BOSPSJ,RE sVERIFY STACK DECRIMENT 
3837 014204 001006 BNE 16% sBRANCH IF STACK INCORRECT 
3838 014206 021627 000377 CMP (R6),¢377 s;VERIFY CONTENTS OF STACK 
3839 014212 001003 BNE 16$ sBRANCH IF DATA ON STACK INCORRECT 
3840 014214 022704 014014 CMP @MJSRB -2,R4 ;SEE IF CORRECT RETURN ADDRESS 
3841 014220 001401 BEQ MJSR5B ;BRANCH IF GOOD 
3842 014222 104001 16$: ERROR +1 ;CPU ERROR 
3843 :;JSR MODE 5S FAILED 
3844 014224 005237 003032 MJSRSB: INC @eSEQ sUPDATE SEQUENCE COUNTER 
3845 014230 013706 003034 MOV aeSPS ,R6 sRELOAD STACK POINTER 
3846 014234 012704 123456 MOV #123456,R4 s;SETUP DATA IN R4 
3847 014240 012701 014112 MOV #MJSR6+10,R1 sSETUP JSR VECTOR 
cob 014244 004461 177770 JSR R4,-10(R1) 3; JUMP MODE 6 
3 
3850 : 
3851 014250 022737 000007 003032 MJSR7: CMP #7, a0SEQ 3; TEST FOR CORRECT SEQUENCE 
3852 014256 001401 BEQ MJSR7A ;BRANCH IF GOOD 
3853 014260 104001 17$: ERROR ol ;CPU ERROR 
3854 sMODE 7 JUMPED TO OUT OF SEQUENCE 
3855 014262 023706 003036 MJSR7A: CMP @eSPSJ RE sVERIFyY STACK DECRIMENT 
3856 014266 001006 BNE 18$ sBRANCH IF STACK INCORRECT 
3857 014270 021627 177773 CMP (R6),%-5 ;VERIFY CONTENTS OF STAACK 
3858 014274 001003 BNE 18$ ;BRANCH IF DATA ON STACK INCORRECT 
3859 014276 022704 014164 CMP @MJSR5-2,R4 3;SEE IF CORRECT RETURN ADDRESS 
3860 014302 001401 BEG MJSR7E ;BRANCH IF GOOD 
3861 014304 104001 188: ERROR ol ;CPU ERROR 
3862 3JSR MODE 7 FAILED 
3863 014306 MJSR7E: 
tard 014306 013706 003034 MOV @esSPs ,RE sREPLACE STACK 
3866 ; 
3867 014312 MURA: 
3868 
3869 TEST JSR MODES 27, 37, 67, 
3870 014312 012737 000001 003032 MOV #1,@@SEQ 3;SETUP SEQUENCER 
3871 014320 010637 003034 MOV R6,BeSPS sSAVE STACK ADDRESS 
3872 014324 010637 003036 MOV R6,aeSPSJ sSAVE STACK DECRIMENT ADDRESS 
3873 014330 162737 2 003036 SUB 2, 0¢SPSJ Hy 
3874 014336 012704 177777 MOV #-1,R4 sSETUP R4& DATA 
te 014342 004427 000240 JSR R4, #240 sEXECUTE A JSR MODE 27 
H 
3877 014346 022737 000001 003032 MUJR27: CMP #1,@@SEQ sVERIFy COERRECT TEST SEQUENCE 
3878 014354 001011 BNE 1$ s INCORRECT TEST SEQUENCE 
3679 014356 022706 003036 CMP @OSPSJ,RO sVERIF y STACK POINTER 
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BNE 1$ 
CMP (R6),%-1 
BNE 1$ 
CMP R4, @MURZ7 
BEQ MJR27A 
1$: ERROR ol 
MJR27A: INC @eSEQ 
MOV #152525 ,R4 
MOV @eSPS,R6 
JSR R4,9OMIR37 
MJR27B: HALT 
: 
MJR67: CMP aeSEQ, #3 
BNE es 
CMP @OSPS RE 
BNE es 
CMP (R6),4125 
BNE 2s 
CMP R4,a@MJR77 
BEQ MJR67A 
2s: ERROR ol 
MJR67A: INC @esea 
MOV @eSPS,R6 
_ MOV #1,R4 
JSR R4 , AMIROB 
MJR6A: HALT 
MJR6B: .WORD MJR77 
$ 
MJR37: CMP @OSEQ, 42 
BNE es 
CMP @ESPSJ,RE 
BNE es 
CMP (R6), 0152525 
BNE es 
cmp R4, @MJR278 
BEQ MIR37Aa 
2s: ERROR ol 
MJR37A: INC @eSEQ 
MOV @OSPS,R6 
MOV #125,R4 
JSR R4,MURE? 
; 
MJR77: CMP OeSEQ, 44 
BNE es 
CMP @eSPSJ,R6 
BNE es 
CMP (R6),41 
BNE es 
CMP R4, OMUREA 
BEQ MJR77A 
2s: ERROR *1 


MIR? 7A; 


sVERIFY R4 GOT LOADED ON THE STACK 
sBRANCH IF INCORRECT STACI es 
sVERIFY CORREC!] RETURN ADORES 

sBRANCH IF GOOD RETURN ADDRESS ON STACI 


sCPU ERROR 
sMODE 27 FAILED 


sUPDATE SEQUENCER 
sSETUP R4& TEST DATA 
sRESET STACK POINTER 
sJSR MODE 37 


sVERIFy TEST SEQUENCE 

s INCORRECT TEST SEQUENCE 
sVERIFy STACK DECRIMENT 

s INCORRECT STACK DECRIMENT 
sVERFIFY STACK WAS LOADED 


sVERIFyY RETURN ADDRESS 
s;BRANCH IF GOOD 


;CPU ERROR 
sMODE 67 FAILED 


sUPDATE SEQUENCER 
sRESET STACK 
sSETUP R4 DATA 
3JSR MODE 77 


sDATA FOR MODE 77 JUMP 


sVERIFY TEST SEQUENCE 

s INCORRECT TEST SEQUENCE 
sVERIFY STACK DECRIMENT 

s INCORRECT STACK DECRIMENT 
sVERFIFY STACK WAS LOADED 


sVERIF + RETURN ADDRESS 
sBRANCH IF GOOD 


;CPU ERROR 
sMODE 37 FAILED 


sUPDATE SEQUENCER 
sRELOAD STACK 
;SETUP R4 TEST DATA 
3JSR MODE 6 


sVERIFy TEST SEQUENCE 

s INCORRECT TEST SEQUENCE 
sVERIFY STACK DECRIMENT 

s INCORRECT STACK DECRIMENT 
sVERFIFY STACK WAS LOADED 


sVERIFy RETURN ADDRESS 
sBRANCH IF GOOD 


;CPU ERROR 
3MODE 


?? FAILED 


Jt 
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COKDAB.P11 05 -APR 84 16:45 eeeceeseeceoe DOUBLE OPERAND TESTS eeeasseccceceoses SEQ 0074 
29% : 
eh 014614 013706 003034 MOV @OSPS ,R6 sRESET STACK 
3958 
3939 : 
3940 014620 MRIS: 
3941 
5942 : TEST RTS AND RTS R6 
3943 014620 012706 001000 MOV @STBOT ,R6 s INSURE VALID STACK 
3944 014624 012746 123456 MOV 123456, -( RE) sSETUP TEST REGISTER 
3945 014630 012703 014640 MOV ORTSL,RS sSETUP TEST PC 
3946 014634 000203 RTS Re 3@eTEST INSTRUCTION 
3947 014636 104001 ERROR +1 ;CPU ERROR 
3946 s INCORRECT PC ON RTS 
3949 014640 022703 123456 RTS1L: cmp #123456,R3 
3950 014644 001401 BEQ RTS6 ;BRANCH IF GOOD 
3951 014646 104001 ERROR ol ;CPU ERROR 
465 | sREGISTER CONTENTS INCORRECT 
9 3 
to sTHIS TEST CHECKS AN UN TESTED PLA TERM 
; 
3956 014650 010601 RTS6: MOV R6,R1 sSAVE STACK IN R1 
3957 014652 012705 014664 MOV #1$,R5 sMOVE EXPECTED RETURN ADDR TO RS 
3958 014656 010506 MOV R5,R6 sMOVE RETURN ADOR TO RE 
3959 014660 000206 RTS RG 3 
3960 014662 104001 ERROR ol :CPU ERROR 
3961 sERROR! RTS NOT EXECUTED 
3962 014664 021506 1$: CMP (R5),R6 :I1S R6+31506? 
3963 014666 001401 BEQ RTSE ;IF IT IS THEN GO TO END OF TEST 
3964 014670 104001 ERROR +1 ;CPU ERROR 
3965 sERROR! WRONG ADDR IN R6 
rt 014672 010106 RTSE: MOV R1,R6 sRESTORE STACK 
3968 014674 TSMMUO: 
3969 SETUP AND TEST KERNEL, SUPERVISOR AND USER STACKS 
3970 014674 012737 177776 MOv #40000 80177776 :SET PS TO SUP MODE 
3971 014702 012706 177777 MOV @177777,R6 : INIT SUP STACK TO Act ONES 
3972 014706 022706 177777 CMP 9177777,R6 sARE ALL BITS SET 
3973 014712 001401 6c 1s :YES GO ON 
3974 3NO GO TO ERROR 
3975 014714 104001 ERROR +l ;CPU ERROR 
3976 014716 005006 1$: CLR R6 ;SET SUP STACK TO ALL ZEROES 
3977 014720 022706 000000 CMP #0 ,R6 sARE ALL BITS CLEARED 
3978 014724 001401 BEQ <$ :YES GO ON 
3979 3NO GO TO ERROR 
3980 014726 104001 ERROR +1 ;CPU ERROR 
3981 014730 012706 125252 2s: MOV #125252 ,R6 ;SET SUP STACK TO ALTERNATING PATTERN 
3982 014734 022706 125252 CMP #125252 ,R6 :I1S SUP SP CORRECT 
3983 014740 001401 BEQ 3$ :'ES GO ON 
3984 :NO GO TO ERROR 
3985 014742 104001 ERROR ol sCPuU ERROR 
3986 014744 012706 052525 3$: MOV #52525 , Rb 3SET SUP STACK TO ALTERNATING PATTERN 
3987 014750 022706 052525 CMP #52525 ,R6 :IS SUP SP CORRECT 
3988 014754 001401 BEQ 4s ;YES GO ON 
2989 sNO GO TO ERROR 
3990 014756 104001 ERROR +1 ;CP\) ERROR 
2991 014760 012706 000700 43; MOV #700 ,R6 ;SETUP SUP SP 
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COKD 


014764 
014772 
014776 
015002 


015004 
015006 
015010 
015014 


015016 
015020 
015024 
015030 


015032 


015112 
015116 


015120 
015122 
015130 
015134 


015136 
015140 
015144 
015150 


015152 
015154 
015154 


015160 
015166 
015172 
015176 


015200 
015202 
015210 


012737 
012706 


012737 
004767 
022716 
001401 


104001 
01273? 
022716 


140000 
177777 
177777 


125252 
125252 


052525 
052525 


177776 
001000 


000206 
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177776 


177776 


177776 


177776 


177776 


05 - APR - 84 
aeeeeeeesease DOUBLE 


S$: 


6$: 


7$: 


RET1: 


2s: 


3%: 


JMP 


16:45 


PAGE 76 
OPERAND TESTS eseesesseceecsere 


I< 


SEG 9075. 


#140000 ,80177776 3;SET PS TO USER MODE 
#177777,R6 sINIT USER STACK TO ALL ONES 
#177777,R6 sARE ALL BITS SET 
5$ sYES GO ON 
sNO GO TO ERROR 
+1 ;CPU ERROR 
R6 3SET USER STACK TO ALL ZEROES 
#0 ,R6 sARE ALL BITS CLEARED 
6$ ;YES GO ON 
sNO GO TO ERROR 
+1 ;CPU ERROR 
#125252 ,R6 ;SET USER STACK TO ALTERNATING PATTERN 
#125252 ,R6 :IS USER SP CORRECT 
7$ :YES GO ON 
:NO GO TO ERROR 
ol ;CPU ERROR 
#52525 ,R6 3;SET USER STACK TO ALTERNATING PATTERN 
#52525 ,,R6 3IS USER SP CORRECT 
8$ :YES GO ON 
;NO GO TO ERROR 
ol ;CPU ERROR 
#600 ,R6 sSETUP USER SP 
@0177776 3;SET PS TO KER MODE 
@STBOT ,R6 3;SETUP KERNEL SP 
a¢700 sCLEAR FIRST WORDS OF SUP, KER, AND USE STACKS 
280600 Fy 
aesTBoT 3 
PC, CHECK 3s TEST KER, SUP, AND USE STACKS 
#40000 ,8#177776 :;SET PSwW TO SUP MODE 
#700 ,R6 31S SUP SP CORRECT 
1$ ;YES GO ON 
:NO GO TO ERROR 
ol ;CPU ERROR 
#140000 ,80177776 SET PSw TO USE MODE 
9600 ,R6 31S USE SP CORRECT 
es YES GO ON 
3NO GO TO ERROR 
+1 3;CPU ERROR 
@0177776 3;SET PSW TO KER MODE 
®STBOT ,RE ;IS KER SP CORRECT 
3$ 3YES GO ON 
:NO GO TO ERROR 
+1 ;CPU ERROR 
MTSO 


Hy 
sROUTINE TO CHECK STACKS wr TER TWO RTS STATEMENTS 


3 
CHECK: 
RETO: 


1$: 


#40000 ,@@17 


PC.CHECK1 
#0,(SP ) 
1$ 


ol 
#140000 ,a#1777 76 


#0,(5P) 


77/6 3ST PSwW TO SUP MODE 
3; TEST SUP, KER, AND USE STACKS 
sIS SUP STACK CLEARED 
:YES GO ON 
:NO GO TO ERROR 
;CPU ERROR 
;SET PSw TO USE MODE 
31S USt STACK CLEARED 


L&é 
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4048 015214 001401 BEQ es :YES GO ON 
4049 ;NO GO TO ERROR 
4050 015216 104001 ERROR +1 ;CPU ERROR 
4051 015220 005037 177776 es: CLR @0177776 :SET PSW TO KER MODE 
4052 015224 022716 015104 CMP #RET1,(SP) DOES KER STACK HAVE CORRECT DATA 
4053 015230 001401 BEQ 3$ : YES GO ON 
4054 3NO GO TO ERROR 
4055 015232 104001 ERROR +1 3CPU ERROR 
ross 015234 000207 3$: RTS PC ;RETURN 
a 3 
rye . sROUTINE TO CHECK STACKS AFTER ONE RTS 
4059 H 
4060 015236 012737 140000 177776 CHECK1I: MOV #140000 ,80177776 ;SET PSW TO USE MODE 
4061 015244 004767 000044 JSR PC ,CHECK2 ; TEST KER, SUP, AND USE STACKS 
4062 015250 022716 000000 RET3: CMP #0,(SP) :IS USE STACK CLEARED 
4063 015254 001401 BEQ 1$ :YES GO ON 
4064 3NO GO TO ERROR 
4065 015256 104001 ERROR +1 ;CPU ERROR 
4066 015260 005037 177776 1$: CLR 80177776 3SET PSW TO KER MODE 
4067 015264 022716 015104 CMP MRET1,(SP) ;IS KER STACK CORRECT 
4068 015270 001401 BEQ es :YES GO ON 
4069 :NO GO TO ERROR 
4070 015272 104001 ERROR ol 3;CPU ERROR 
4071 015274 012737 040000 177776 28: MOV #40000 ,80177776 ;SET PSW TO SUP MODE 
4072 015302 022716 015172 CMP MRET2,(SP) 3IS SUP STACK CORRECT 
4073 015306 001401 BEQ 3$ YES GO ON 
4074 :NO GO TO ERROR 
4075 015310 104001 ERROR +1 ;CPU ERROR 
rote 015312 000207 3$; RTS PC ;RETURN 
& 
ro de sROUTINE TO CHECK STACKS AFTER ZERO RTS 
r 
4080 015314 022716 015250 CHECK2: CMP @RET3,(SP) 31S USE STACK CORRECT 
408i 015320 001401 BEG 1$ ;YES GO ON 
4082 s;NO GO TO ERROR 
4083 015322 104001 ERROR | ;CPU ERROR 
4084 015324 012737 040000 177776 18: MOV #40000 ,80177776 sSET PSW TO SUP MODE 
4085 015332 022716 015172 CMP MRET2,( SP) 3IS SUP STACK CORRECT 
4086 015336 001401 BEQ 2s ;¥ES GO ON 
4087 :NO GO TO ERROR 
4088 015340 104001 ERROR ol ;CPU ERROR 
4089 015342 005037 177776 2s: CLR @4177776 s;SET PSW TO KER MODE 
4090 015346 022716 015104 CMP #RET1,(SP) ;IS KER STACK CORRECT 
4091 015352 001401 BEQ 3$ sYES GO ON 
4092 s;NO GO TO ERROR 
4093 015354 104001 ERROR +1 ;CPU ERROR 
4094 015356 012737 140000 177776 3%: MOV #140000 ,8%177776 3;SET PSW TO USE MODE 
4095 015364 000207 RTS PC ;RETURN 
4096 3 
4097 015366 MTSO: 
4098 015366 MMVCC: 
4099 
4100 ; TEST MOV CONDITION CODES 20 
4i01 015366 000277 scc H 
4102 015370 000244 CLZ 3CC=1011 


4103 015372 012704 000000 MOV #0,R4 sCC-O101, R4A-0 
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015376 


015524 


005004 
005104 
000277 
000244 
042704 
100403 
102402 
103001 
001401 
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100000 


100000 


177777 


M6 
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eeeeeeeeeese DOUBLE OPERAND TESTS eeeeseeeecesasese 


3$; 
4$: 


1$: 
2s: 


3%: 
4$: 


mMBCCC: 


BMI 1$ sERROR IF N FLAG 

BVS 1$ sERROR IF V FLAG SET 

BCC i$ sERROR IF C FLAG CLEAR 

BEQ es sSKIP IF Z FLAG SET 
3CC SHOULD-0101 

co +1 ;CPU ERROR 

-WORD 251 3CC=0110 

MOV #100000 ,R4 #R4=100000, CC=1000 

BEQ 3$ sERROR IF Z SET 

BVS 3$ sERROR IF Vv SET 

BCS 3$ sERROR IF C SET 

BMI 4$ sEXIT IF N SET 

ERROR +1 ;CPU ERROR 


:CC SHOULD= 1000 


TEST aera CODES - ##0- 


CLR 
COM R4 3R4=-1 
scc 3 
a & 5 ;CC=1011 
BIT #0,R4 :CC=0101 
BMI 1$ sERROR IF N FLAG 
BVS 1$ sERROR IF V FLAG SET 
Bcc 1$ ;ERROR IF C FLAG CLEAR 
BEQ 2s ;SKIP IF Z FLAG SET 
FRROR +1 ;CPU ERROR 
:CC SMOULD=0101 
sce 
2 251 3CC=0110 
BIT #100000 ,R4 3CC=1000 
BEQ 3$ ;ERROR IF Z SET 
BvS 3$ ;ERROR IF v SET 
bcs 3$ sERROR IF C SET 
BMI 4s sEXIT IF N SET 
ERROR +1 ;CPU ERROR 


:CC SHOULD= 1000 


TEST BIC CONDITION CODES - ¢e0- 
CLR R4 


scc 3 

CLZ 3CC=1011 

BIC #177777,R4 3CC=0101 

BMI 1$ sERROR IF N FLAG 

BVS 1$ sERROR IF V FLAG SET 
BCC 1$ sERROR IF C FLAG CLEAR 


BEQ 2s soK IP IF 2 FLAG SET 


SEQ 0077 


Lea A KDJ11 8 wr ew pre! 
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015526 


015530 
015532 
015534 
015536 
015542 
015544 
015546 
015550 
015552 


015554 


015574 


012704 
000257 


103413 
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077777 


100076 


077777 
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eeeeeeeeeees DOUBLE OPERAND TESTS eeeseeseseseesers 
1$: ‘ ERROR +1 ;CPU ERROR 
:CC SHOULD-0101 
2s: COM R4 3R4=-1 
scc 
. WORD 251 :CC=0110 
BIC #77777,R4 :CC=1000 
BEQ 3$ sERROR IF Z SET 
BVS 3$ sERROR IF Vv SET 
BCS 3$ sERROR IF C SET 
BMI 4$ sEXIT IF N SET 
3$; ERROR +l ;CPU ERROR 
:CC SHOULD= 1000 
4$: 
MBSCC 
H TEST BIS CONDITION CODES 
CLR RG 3R4=0 
scc 
. WORD 246 :CC=1001 
BIS #0,R4 3R4-0, CC=0101 
BMI 1$ ;ERROR IF MINUS 
BvS 1$ sERROR IF v SET 
Bcc 1$ sERROR IF C CLEAR 
BEQ es sBRANCH IF GOOD 
1$: ERROR el ;CPU ERROR 
;BIS CC FAILED 
28: scc 
€L_c 3CC*1110 
BIS #100076,R4 3R4=100076, CC=1000 
BEG 3$ sERROR IF Z SET 
BVS 3$ sERROR IF v SET 
BCS 3$ sERROR IF C SET 
BMI as ;BRANCH IF GOOD 
3$: FRROR ol ;CPU ERROR 
;B8AD BIS CC 
4$: 
MDCCC 
; TEST DEC, INC CONDITION CODES 
MOV #77777,R4 3R4=77777 
ccc 
SEC 3CC=0001 
INC ka :R4=100000, CC-O011 
BEG 1$ sERROR IF ZERO 
BPL 1$ sERROR It POSITIVE 
BvC 1$ sERROR IF v CLEAR 
BCS es sBRANCH IF GOOD 
18: ERROR ol ;CPU ERROR 
: INC FAILED 
2s: ccc , 
INC R4 ;R4=100001, es 1000 
BCS 3$ sERROR IF C SE 


SEQ 0078 


iw 
dD 
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4216 015654 102412 BVS 38% sERROR IF v SET 
4217 015656 005304 DEC R4 3R4-100000, CC+1000 
4218 015660 102410 BVS 33 sERROR IF V SET 
4219 015662 103407 ce. & : sERROR IF C SET 
4220 015664 000277 scc 1 
4221 015666 000252 . WORD 252 sCC*O0101 
4222 015670 005304 DEC RA sR4=77777, CC#1011 
4223 015672 001403 BEQ 33 sERROR IF Z SET 
4224 015674 102002 BvC 3$ sERROR IF v CLEAR 
4225 015676 103001 BCC 3$ sERROR IF C CLEAR - 
4226 015700 100001 BPI 43 sBRANCH IF GOOD 
eo? O15702 104001 3$; ERROR ol ;CPU ERROR 
4228 sBAD CC 
4229 015704 43; 
4230 
4231 
mrt | ©15704 MCTSCC: 
4234 3 TEST CLR, TST, SWAB CONDITION CODES 
4235 FESSMOSEASHHEASHEEHEHSEHEEHHOHEHHSEOHEEEEOEEEEHESEEHEEEEHEEEE EE EES 
4236 30100 - #e00 - #000 
4237 015704 000277 scc 
4238 0157 000244 CLZ 3CC*1011 
4239 015710 005004 CLR R4 sR4*0, CC*0100 
4240 015712 100403 BMI 1$ sERROR < MINUS 
4241 015714 102402 BVS 1$ ERROR Ir wv SET 
4242 015716 103401 BCS 1$ sERROR F Cc se? 
4243 015720 001401 BEQ es sBRANCH IF GOOD 
4244 015722 104001 18: ERROR ol :CPuU ERROR 
4245 sBAD CC ON CLR 
4246 015724 005104 2s: COM Ra sR4=-1 
4247 015726 000277 scc sCC-1l111 
4248 015730 005704 TST R4 3CC=1000 
4249 015732 001403 BEQ 3$ sERROR IF 2 SET 
4250 015734 102402 BVS 8s sERROR IF v SET 
4251 015736 103401 BCS 3$ sERROR IF C SET 
4252 015740 100401 BMI 4$ ;BRANCH IF GOOD 
4253 015742 104001 3$; ERROR ol sCPU ERROR 
4254 ;BAD 1S1 CC 
4255 015744 00027 43; scc 3CC*1111 
4256 015746 000304 SWAB R4 3CC #1000 
4257 015750 102402 BvS 5$ sERROR IF v SET 
4258 015752 103401 BCS 5$ sERROR It C sett 
4259 015754 100401 BMI 6$ sSRANCH IF GOOD 
4260 015756 104001 58: ERROR +l 3;CPuU ERROR 
4261 38AD SWAB CC 
4262 015760 6%; 
42653 
4264 
4265 015760 MADCC: 
4266 
4267 3 TEST ACD CONDITION CODES 
4268 015760 012704 077777 MOV @/7777,R4 i: nnn 
4269 015764 012701 000001 MOV 01,R1 sRivd 
4270 015770 000257 ccc 3CC «0000 


4271 015772 060401 ADD R4,R1 aerer? © 2 = LOOOOO IN RY 


C/ 
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4272 015774 102003 BvC 1$ sERROR IF v CLEAR 
42°38 015776 103402 BCS 1$ sERROR IF CARRY 
42°74 016000 001401 BEQ 1$ sERROR IF 2 SET 
4275 016002 100401 BMI 23 ;BRANCH IF GOOD 
4276 016004 104001 1$: ERROR +1 sCPU ERROR 
aor? 3CC SHOULD +1010 
4278 016006 005204 2s: INC R4 3R4*100000 
42°29 016010 060401 ADD R4,R1 3100000 + 100000 + 0 IN Rl 
4280 016012 102002 BVC LY sERROR IF v CLEAR 
4281 016014 103001 Bcc 3$ sERROR IF CARRY CLEAR 
4282 016016 001401 BEQ 4s s;BRANCH IF GOOD 
4288 016020 104001 3$; ERROR +1 sCPU ERROR 
4284 sCC SHOULD = O111 
285 016022 Ovv40i 4$: ADD R4,R1 30 + 100000 = 100000 

4286 016024 102402 BVS S$ sERROR IF v SET 
4287 016026 103401 BCS S$ sERROR IF SET 
4288 016030 i00401 BMI 6$ ;BRANCH IF GOOD 
4289 016032 104001 S$: ERROR +1 sCPU ERROR 
4290 3CC SHOULD = 1000 
4291 016034 6$: 
4292 
4293 
4294 016034 MACCC: 
4295 
42% 3 TEST ADC CONDITION CODES 
4297 016034 012704 177777 MOV @177777,R4 3R4"177777 
4298 016040 00027? scc sCC*1111 
4299 016042 005504 ADC Ra “R40 CC+0101 
4300 016044 100403 BMI 1$ sERROR IF MINUS 
4301 016046 102402 BVS 1$ sERROR IF v SET 
4302 016050 103001 BCC 1$ sERROR IF C SET 
4303 016052 001401 BEQ 23 s;BRANCH IF GOOD 
4304 016054 104001 L$: ERROR +1 sCPU ERROR 
4305 3BAD ADC 
4306 016056 012704 077777 2s: MOV 0077777,R4 3R4*077777 
4307 016062 000277 scc , 
4308 016064 000242 Civ sCC*1101 
4309 016066 005504 ADC R4 3R4=100000 CC-1010 
4310 016070 100003 BPL 3$ sERROR IF PLUS 
4311 016072 103402 BCS 3$ sERROR IF C SET 
4312 016074 001401 BEG 85 sERROR IF ZERO 
4313 016076 102401 BVS 4s s;BRANCH IF GOOD 
4314 016100 104001 3%; ERROR +1 ;CPU ERROR 
6315 38AD ADC 
4316 016102 000277 4s: scc sCC*1111 
4317 016104 005504 ADC Ra 3R4=100000 CC-1000 
4318 016106 102402 BVS S$ ;ERROR IF v SET 
4319 016110 103401 BCS 5$ sERROR IF C SET 
4320 016112 100401 BMI 6$ ;BRANCH IF GOOD 
4321 016114 104001 S$: ERROR +t ;CPU ERROR 
4322 :B8AD ADC CC SROULD> 1000 
4323 016116 6%: 
ton 

4325 
4326 016116 MNCCCC: 
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4328 
4329 
43350 
4331 
4332 
4333 
4334 
4335 


016116 
016122 
016124 
016126 
016130 
016132 
016134 
016136 


016140 
016142 
016144 
016146 
016150 
016152 
016154 
016156 


016160 


016222 


016224 
016226 
016230 
016232 


016234 


0162354 


016234 
016240 
016242 


016246 
016250 
016252 
016254 
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-84 16:45 


012704 O77777 
000257 


077777 


012701 170000 


012704 
000257 
162704 


102003 
100002 
001401 
103401 


077775 
137757 


D/ 


05 APR a4 6:4 Pp ‘ 
sieacasasdan bbls OBER RAD TESTS eeeseesssesseeces 
3 TEST NEG, al a CONDITION 

MOV #077 
ccc 
NEG R4 
BVS 1$ 
BCC 1$ 
BEQ 1$ 
BMI es 
1$: ERROR ol 3CPuU 
;BAD 
2s: CLR R4 
ccc 
NEG k4 
BMI 3$ 
BCS 33 
BVS 3$ 
BEQ 4s 
3$; ERROR ol 3CPu 
;BAD 
4$: MOV 077777,R4 
MOV #170000,R1 
ccc 
CMP R4,R1 
BvC 5$ 
BCC S$ 
BEQ S$ 
BMI 6$ 
S$: ERROR ol 3CPU 
3;BAD 
63: ccc 
COM R1 
BMI 7$ 
BEQ 7% 
BCC 7$ 
BvC 8$ 
7$: ERROR ol 3sCPuU 
38A0 
83: sc 
COM RL 
BMI 10$ 
93: ERROR ol 3sCPu 
;BAD 
10$: 
MSBCC 
3 TEST SUB CONDITION CODES 
MOV 077775,R4 
ccc 
SUB #137757,R4 
Bvc 1$ 
BPL 1$ 
BEQ 1$ 
BCS es 


CODES 
3R4-77777 
sCC =0000 
3R4=100001 CC-+1001 
sERROR IF v SET 
sERROR IF C CLEAR 
sERROR IF Z SET 
;BRANCH IF GOOD 
ERROR 
NEGATE 
3R4=0 
3CC =9000 
3CC=0101 
sERROR IF N SET 
sERROR IF C SET 
3ERROR IF v SET 
sBRANCH IF GOOD 
ERROR 
NEG 
3R4=77777 
3R1+170000 
3CC= 
377777 - 170000 = 107777 CC= 1011 
sERROR IF v CLEAR 
sERROR IF C CLEAR 
sERROR IF ZERO 
:BRANCH IF GOOD 
ERROR 
CMP 
sRL97777 
sERROR IF MINUS 
sERROR IF ZERO 
sERROR IF CARRY 
sBRANCH IF GOOD 
ERROR 
com 
;BRANCH IF GOOD 
ERROR 
COM 
\ 
\ 
BS 
sR4=77775 
:CC=0000 
377775 - 13775? 
sTRY TO CAUSE AN ARITHMETIC OVERFLOW 
sERROR IF v CLEAR 
sERROR IF RESULT IS POSITIVE 
sERROR IF 2 SET 
;BRANCH IF GOOD 


‘\ 


SEQ 0061 
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016256 


016302 
016304 


016304 


016304 
016310 
016312 
016314 
016316 
016320 
016322 
016324 
016326 
016330 
016332 


016334 


016370 


016370 


016370 
016374 
016376 
016400 
016402 
016404 


104001 


012704 
000257 
162704 


012704 
000257 
006104 
103402 
102001 
100401 


000005 
000012 


100000 


060000 


E / 
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1$: 
es: 


3$: 
4$; 


MSBCCC: 


1$: 
2s: 


ERROR ol 

MOV #5,R4 
ccc 

SUB #12,R4 
BCC 3$ 

BVS 3$ 
BEQ 3$ 

BMI 5 
ERROR +1 


TEST SBC CONDITION CODES 
MOV #100000 ,R4 


sBCc R4 
BPL 1$ 
BVS 1$ 
SEC 

SBC R4 
BvC 1$ 
BCS 1$ 
BPL 2s 
ERROR ol 
CLR R4 
scc 

CLC 

sBC R4 
BcS 3$ 
BVS 3$ 
BNE 3$ 
SEC 

sBC R4 
BCC 3$ 
BvS 3$ 
BEQ 3$ 
BMI 4$ 
ERROR el 


TEST ROL roe yy CODES 


MOV 60000 ,R4 
ccc 

ROL R4 

BCS 1$ 

BvC 1$ 

BMI es 


;CPU ERROR 
;BAD SUBTRACT 


3R4=5 

3CC =0000 

35-12+-5 AND SETS CARRY 
sERROR IF CARRY CLEAR 
sERROR IF OVERFLOW 
sERROR IF ZERO 

sBRANCH IF GOOD 


;CPU ERROR 
;SUBTRACT FAILED 


3R4=100000 

3C =0000 

sTRY TO SET Vv 

sERROR IF N CLEAR 

sERROR IF v SET (HAVENT SET C YET) 
sCC SHOULD = 1001 

sTRY AGAIN TO SET v 

sERROR IF v CLEAR 

sERROR IF C SET 

sBRANCH IF GOOD 


;CPU ERROR 
:SBC FAILED 


3R4=0 


:CC=1110 

sTRY TO CAUSE C FLAG FAILURE 
sERROR IF C SET 

sERROR IF v SET 

sERROR IF NOT ZERO 

sSET CARRY 

sNOW, O - CARRY + 177777 
sERROR IF CARRY CLEAR 
sERROR IF Vv SET 

sERROR IF ZERO 

;BRANCH IF GOOD 


3CPU ERROR 
;SBC FAILED 


sR4= 0110000000000000 
3CC =0000 

sR42 1100000000000000 
;ERROR IF CARRY 
sERROR IF v CLEAR 
sBRANCH IF GOOD 


EQ 0082 
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4440 
4441 
4442 
4443 
8434 
4445 
4446 
4447 
4448 
4449 


016406 


016410 
016412 
016414 
016416 
016420 


016422 
016424 
016426 
016430 
016432 
016434 


016436 
016440 
016442 
016444 
016446 


016450 


016450 


016450 
016454 
016456 
016460 
016462 
016464 
016466 


016470 
016472 
016474 
016476 
016500 


016502 
016504 
016506 
016510 
016512 


016514 
016516 
016520 
016522 
016524 


016526 


104001 


006104 
103002 
102401 
100401 
104001 


006104 
102003 
103002 


OS -APR-84 16:45 


000003 


O5-APR-84 16:45 PAGE 8 
aeeeeeeeaeae DOUBLE OPERA 


1$;: ERROR +! 

2s: ROL R4 
BCC 3$ 
BvS 3$ 
BMI 4$ 

3$; ERROR ol 

4$: ROL R4 
BvCc 5$ 
BCC 5$ 
BMI 5$ 
BNE 6$ 

S$: ERROR ol 

6$: ROL R4 
BVS 7$ 
bcs 7$ 
BPL 8$ 

7$; ERROR ol 

8$: 

MRRCC: 

3 TEST ROR 
MOV o 
ccc 
ROR R4 
BCC 1$ 
BVC 1$ 
BPL es 

1$: ERROR ol 

2s: ROR R4 
BCC 3$ 
BYS 3$ 
BMI 4$ 

3$;: ERROR ol 

4$: ROR R4 
BYC 5$ 
BCS S$ 
BMI o$ 

S$: ERROR +l 

63: ROR RG 
BvS 7$ 
BCS 7$ 
BPL 8$ 

7$;: ERROR +1 


8%; 


F/ 


4 
ND TESTS seer seneeeseres 


sCPU 
;ROL 


CONDITION CODES 
3,R4 


;CPuU 
;ROR 


3;CPU 
;BAD 


3;CPU 
;BAD 


3CPU 
;6AD 


ERROR 

FAILED 
sR4= 1000000000000000 
sERROR IF CARRY CLEAR 
sERROR IF v SET 
sBRANCH IF GOOD 

ERROR 

ROL 
3;R4 = 
sERROR IF v CLEAR 
sERROR IF C CLEAR 
sERROR IF MINUS 
sBRANCH IF GOOD 

RROR 


E 

ROL 
sR4=000000000000011 
sERROR IF Vv SET 
sERROR IF C SET 
;BRANCH IF GOOD 

ERROR 

ROL 


sR4&= 0000000000000011 
:CC= 0000 
sR4= 0000000000000001 
;ERROR IF NO CARRY 
sERROR IF v CLEAR 
;BRANCH IF GOOD 

ERROR 

FAILED 

:R4= 1000000000000000 
sERROR IF CARRY CLEAR 
sERROR IF v SET 
sBRANCH IF GOOD 

ERROR 

ROR 
sR4 = 1100000000000000 
;sERROR IF V 
sERROR IF C SET 
;BRANCH IF GOOD 

ERROR 

ROR 
sR4&= 011000000000000 
sERKOR IF v SET 
sERROR IF C SET 
sBRANCH IF GOOD 

ERROR 

ROR 


SEQ 0083 


of 
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COKDAB .P 11 


4496 
4497 
4498 


016526 


05 - APR -84 


012701 


16:45 


052525 


045252 


125252 


0S2522 


060000 


eeeeeeeseeee DOUBLE anne TESTS eeeseseseseeaseere 
xCBIT: 
H TEST C BIT WITH ROR/ROL 


WELTIU IIIT itiiiiiiiiiiriiiirtiiiriti ii itiit it) 
;THIS TEST IS TO CHECK FOR A SLOW C BIT PATH INTERNAL TO THE J11 DATA CHIP 
—r ONLY EXHIBITED ON EARLY MASK SETS (1590 AND 1593) 

Vv 


#52525,R1 sINIT R1 WITH DATA 
cLCc ;CLEAR THE C BIT 
ROR R1 sR1*025252, C BIT =1 
ROR R1 3R1*112525, C BIT =0 
ROR R1 3R12045252, C BIT +1 
BCS 1$ ;BRANCH IF CARRY BIT SET 
ERROR ol ;CPU ERROR 
1$: CMP 45252 ,R1 :IS DATA IN R1 = TO EXPECTED DATA? 
BEQ 2s ;BRANCH IF YES 
ERROR +l ;CPU ERROR 
2s: MOV #125252,R1 3SET UP R1 
CLC sCLEAR THE CARRY BIT 
ROL R1 3R1*052524, C BIT =1 
ROL R1 3R1=*125251, C BIT =0 
ROL R1 3R1*052522, C BIT =1 
BCS 3$ ;BRANCH IF CARRY SET 
ERROR ol ;CPU ERROR 
33: ao — R1 3IS CATA IN R1 = TO EXPECTED DATA? 
ERROR ol ;CPU ERROR 
4$: 
MALCC 
3 TEST ASL CONDITION CODES 
MOV #60000 ,R4 3R4= 0110000000000000 
ccc 3CC=0000 
ASL R4 3C=O R4= 1100000000000000 
BCS 1$ sERROR IF CARRY 
BvC 1$ sERROR IF v CLEAR 
BMI 2s sBRANCH IF GOOD 
1$: ERROR +1 ;CPU ERROR 
3;ASL FAILED 
2s: ASL R4 :C=1 R&= 10000000000 
BCC 3$ sERROR IF CARRY CLEAR 
BvVS 3$ sERROR IF v SET 
BMI 4$ ;BRANCH IF GOOD 
3$; ERROR +1 ;CPU ERROR 
;BAD ASL 
4$: ASL R4 3C*1 R&4= 0000000000000000 
BvC 5$ ;ERROR IF v CLEAR 
Bcc 5$ sERROR IF C CLEAR 
BMI 5$ sERROR IF MINUS 
BEQ 6$ sBRANCH IF GOOD 
5$: ERROR ol ;CPU ERROR F 
;BAD ASL 
63: ASL R4 3C=O R4= 000000000000000 
BVS 7$ sERROR IF Vv SET 
BCS 7$ sERROR IF C SET 


BPL 8$ sBRANCh IF GOOD 


SEQ 9084 


H/ 
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05 -APR-84 16:45 Pye rir irit tt DOUBLE OPERAND TESTS seeeesesesssesese 


COKDAB.P 11 


016664 
016666 


016720 
016722 


016724 
016726 
016730 
016732 
016734 


016736 
016740 
016742 
016744 
016746 
016752 
016754 


016756 


016756 


016756 
016762 
016764 
016766 
016770 
016772 
016774 
016776 
017000 


017002 
017004 
017006 
017010 


104001 


000341 


100001 


170016 


123456 


7$: ERROR +1 sCPU 
;BAD 
8S: 
MARCC 
: TEST ASR CONDITION CODES 
MOV #341,R4 
ccc 
ASR R4 
BCC 1$ 
BvC 1$ 
BPL es 
1$: ERROR +1 ;CPU 
3ASR 
2s: BIS #100001 ,R4 
ASR 4 
Bcc 3$ 
BvS 3$ 
BMI 3s 
3$: ERROR ol 3CPU 
;BAD 
4$: ASR R4 
BvCc 5$ 
bcs Ss 
BMI 6$ 
S$: ERROR ol 3CPU 
3BAD 
68: ASR R4 
BvC 7$ 
BCS 7$ 
BPL 7$ 
CMP #170016,R4 
BEQ 8$ 
7$: ERROR ol 3CPuU 
;BAD 
8$: 
MSXTCC: 
; TEST SXT CONDITION CODES / 
MOV #123456 ,R4 
MOV R4,R1 
ccc 
SxT R4 
BCS 1$ 
BMI 1$ 
BvS 1$ 
BEQ es 
1$: ERROR ol 3CPU 
;BAD 
2s: MOV R1,R4 
scc 
SxT R4 
BEQ 3$ 


ERROR 
ASL 


sR4= 0000000011100001 
sCC =0000 
sR4= 0000000001110000 
;ERROR IF NO CARRY 
sERROR IF v CLEAR 
sBRANCH IF GOOD 

ERROR 

FAILED 
3R4= 1000000001110001 
sR4= 1100000000111000 
sERROR IF CARRY CLEAR 
sERROR IF v SET 
;BRANCH IF GOOD 

ERROR 

BSR 
sR4= 1110000000011100 
sERROR IF v 
sERROR IF C SET 
;BRANCH IF GOOD 

ERROR 

ASR 
sR4= 1111000000001110 
sERROR IF v CLEAR 
sERROR IF C SET 
sERROR IF PLUS 


;SEE IF EXPECTED RESULT 


;BRANCH IF GOOD 
ERROR 
ASR 


-e0- 


3R4=123456 
sSAVE CONTENTS 
:CC =0000 
3R4=0 CC=0100 
sERROR IF CARRY 
sERROR IF MINUS 
sERROR IF OVERFLOW 
sBRANCH IF GOOD 
ERROR 
SxT 
sRESTORE R4 
3CC=1111 
sR4=-1 CC-1001 
sERROR IF ZERO 


SEG 9085 
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COKDAB.P11 


4608 
4609 
4610 
4611 
4612 
4013 
4614 
4615 
4616 
4617 
4618 


017012 
017014 
017016 
017020 
017022 
017024 


017026 


017026 


017026 
017032 
017036 
017040 
017042 
017044 
017046 
017050 
017052 


017072 
017074 


017076 
017100 
017102 
017104 
017106 
017110 
017114 
017116 


017120 


017120 


017120 
017122 
017124 
017126 
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100004 
103003 
102402 
005104 
001401 
104001 


012704 
012701 
000257 
074104 
102403 
001402 
103401 
100401 
104001 


012701 
000277 
074104 
100403 
001402 


005004 
000257 
000271 
006 704 


16:45 


123456 
052525 


125252 


OS5-APR-84 16:45 PAGE 8 
eoeeceeceece DOUBLE OCERWO TESTS eeseessseeeseseces 


BPL 3$ sERROR IF PLUS 
Bcc 3$ sERROR IF NO CARRY 
BVS 3$ sERROR IF OVERFLOW 
COM R4 3R4=0 
BEQ 4s sBRANCH IF GOOD 
3$; ERROR +1 ;CPU ERROR 
;BAD SxT 
4$: 
MxRCC 
3 TEST XOR CONDITION CODES / #e0- 
MOV #123456 ,R4 3R4=123456 
MOV #52525,R1 3R1*52525 
ccc 3CC=0000 
xOR R1,R4 seTIe R4=171173 
BvS 1$ ;;ERROR IF OVERFLOW 
BEQ 1$ sERROR IF ZERO 
6cS 1$ sERROR IF CARRY 
BMI es ;BRANCH IF GOOD 
1$: ERROR +1 ;CPU ERROR 
;BAD 
2s: MOV #125252,R1 3R1=125252 
scc 3CC=1111 
xOR R1,R4 3R4=054321 
BMI 3$ sERROR IF MINUS 
BEQ 3$ sERROR IF ZERO 
BCC 3$ sERROR IF CARRY CLEAR 
BvC 4$ sBRANCH IF GOOD 
3$; FRROR +1 ;CPU ERROR 
;BAD 
4$: xOR R4,R4 3R4=0 
BvS S$ sERROR IF OVREFLOW 
BMI 5$ sERROR IF MINUS 
BCC S$ sERROR IF NO CARRY 
BNE 5$ ;ERROR IF NOT ZERO 
CMP 20 ,R4 3;SEE IF EXPECTED RESULT 
BEQ 6$ sBRANCH IF GOOD 
S$: ERROR el ;CPU ERROR 
;BAD 
6%: 
8 
MSXT: 
Fy TEST SxT (SIGN EXTEND INSTRUCTION) 


FE FSSSSSSSHSSHEHSHSSHHSSHSEHHESHEEHASESSESESEHSEHHSHEHHEEHEHEHESHEHESEHEHEEEHEHOEOOS 
;AN ADDITIONAL TEST IS INCLUDED TO CHECK FOR A SLOW N BIT PATH 
;ON A TRANSITION FROM ZERO TO ONE INTERNAL TO THE J11 DATA CHIP 
;THE PROBLEM IS ONLY EXHIBITED ON EARL ¥ MASK SETS (1590 OR 1593) 
; TRASH R4 


CLR 
ccc 
. WORD 
SxT 


Ra 


271 
Ra 


3CC=0000 
3CC +1001 


seTEST INSTRUCTION 


SEQ 9084 
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COKDAB.P11 


017130 
017132 
017134 
017136 
017140 
017142 
017144 


017146 
017150 
017152 
017154 
017160 
017162 
017164 
017166 
017170 
017172 
017174 
017176 


017200 
017204 
017206 


017210 
017212 
017214 
017216 
017220 
017224 


017226 
017232 
017234 
017236 


017236 


017236 
017242 
017246 
017250 
017252 
017254 
017256 
017260 
017262 
017266 
017270 


017272 
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102405 
100004 
001403 


012704 


010102 


000055 


177777 


177777 


177777 


007643 
133333 


134570 


05 - APR - 84 


1$: 
2s: 


16:45 PAGE 88 
eeecceceesoee DOUBLE OPERAND TESTS seeeeescsceesseces 
BVS 1$ ;BRANCH IF OVERFLOW IS NOT CLEARED 
BPL 1$ ;BRANCH IF N BIT EFFECTED 
BEQ 1$ ;BRANNCH IF Z BIT EFFECTED 
BCC 1$ sBRANCH IF C BIT EFFECTED 
INC R4 
BEQ es ;BRANCH IF R4 -0 
ERROR ol ;CPU ERROR 
:CC SHOULD HAVE = 1101 
scc 
CLN 3CC-O111 
CLR R4 
MOV #55,(R4) 3 TRASH RG 
SxT (R4) 3*TEST INSTRUCTION 
BNE 3$ sBRANCH IF BIT EFFECTED 
BVS 3$ ;BRANCH IF OVERFLOW 
6cS 3$ 3 
BMI 3$ ;BRANCH IF N IS SET 
TsT (R4) s;VERIFY INSTRUCTION WORKED 
BEQ 4s sBRANCH IF R4=0 
ERROR +1 ;CPU ERROR 


3$; 


5$: 


18: 


23: 


:SXT FAILED 
NOW TEST FOR SLOW N BIT IN Jil DATA CHIP 


#-1,R0 
R4 
RO 


@7643,R1 
#133333,R4 


$ 
R1,4134570 
es 
*l 
R1,Re 


3RO=177777, N BIT = 1 

;CLEAT THE N BIT 

peeeeTEST INSTRUCTIONeces 
;TEST N BIT TRANSITION 1 °0 0 
sRO SHOULD = O 

;BRANCH IF OK 

;CPU ERROR 

sCLEAR RO, N BIT =: O 

3;SET N BIT 

;eeeTES’ INSTRUCTIONece 

sTES! N BIT TRANSITION O 79 1 
sRO SHOULD = 17777" 

;BRANCH IF OK 

;CPuU ERROR 


;SETUP DATA 
sSETUP DATA 


;¢TEST INSTRUCTION 
sBRANCH IF PLUS TO ERROR 
sERROR IF ZERO 
sERROR IF CARRY CLEAR 
;ERROR IF v SET 
sVERIF y CORRECT RESULT 
;BRANCH IF GOOD 

;CPuU ERROR 

;RAD *OR 


SEQ 0087 


KK / 
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COKDAB.P11 05 -APR-84 16:45 eescccescese DOUBLE OPERAND TESTS eeseceesesecesecs SEQ 0088 
4720 017274 000257 ccc 
4721 017276 074402 xOR R4,RO 3¢TEST INSTRUCTION 
4722 017300 100405 BMI 3$ sERROR IF MINUS 
4723 017302 102404 BvS 3$ sERROR IF OVERFLOW 
472 017304 103403 BCS 3$ sERROR IF CARRY 
472 017306 020227 007643 CMP RO, 97643 
4726 O17312 001401 BEQ 4$ sBRANCH IF GOOD 
4727 017314 104001 3$;: ERROR ol ;CPU ERROR 
4728 ;BAD xOR 
4729 017316 4$; 
4730 
4731 i 
4732 017316 MSOB: 
4733 
4734 : TEST SOB 
4735 017316 0127 000555 MOV #555,R4 ;SETUP TEST COUNTER 
47 017322 000277 scc 3CC-17 
4737? 017324 103015 1$: Bcc es sERROR IF CARRY CLEAR 
4738 017326 102014 BvC es sERROR IF NO OVERFLOW 
4739 017330 100013 BPL es sERROR IF PLUS 
4740 017332 001012 BNE es ;ERROR IF ZERO 
4741 017334 077405 soB R4,1$ ;¢TEST INSTRUCTION 
4742 017336 103005 Bcc 3$ ;ERROR IF CARRY CLEAR 
4743 017340 102004 BvC 3$ sERROR IF NO OVERFLOW 
4744 017342 100003 BPL 3$ ;ERROR IF PLUS 
4745 017344 001002 BNE 3$ ;ERROR IF ZERO 
4746 017346 000167 000010 JMP 4$ 
4747 017352 104001 3$: ERROR ol ;CPu ERROR 
4746 :CC EFFECTED DURING TEST 
4749 017354 000167 000002 JMP 4s 
4750 017360 104001 es: ERROR ol ;CPU ERROR 
ore :CC EFFECTED AFTER TEST 
4752 017362 020427 000000 4$: CMP R44, 90 3IS R& CORRECT 
4753 017366 001401 BEQ 53 ;YES GO ON 
4754 017370 104001 ERROR +1 ;CPU ERROR 
4755 :NO GO TO ERROR 
4756 017372 S$: 
4757 
4758 
4759 0173/72 MMARK : 
4760 
4761 , MARK INSTRUCTION TEST 
4762 017372 012706 000700 MOV #STBOT -100, SP s;SETUP TEST STACK = 700 
4763 017376 012737 125252 000776 MOV #125252 ,a@STBOT 2 ;SET UP NEW RS VALUE ON STACK 
4764 017404 012705 017422 MOV #1$,R5 ;PUT NEW PC IN RS 
4765 017410 012746 006437 MOV oMARK +37, -(SP) ; INSERT MARK 37 INSTRUCTION ONTO STACK 
4766 017414 000277 scc 
4767 017416 000116 JMP (SP) :@ TEST INSTRUCTION 
4768 :MARK INSTRUCTION SHOULD HAVE GONE TO 1$ 
toss 017420 104001 ERROR ol ;CPU ERROR 
; 
4771 017422 101002 1$: BHI 2s ;ERROR IF C OR Z BIT CLEAR 
4772 017424 100001 BPL es ;ERROR IF N BIT CLEAR 
477% 017426 102401 BvS 3$ ;BRANCH IF v BIT SET 
4774 3;B4D CONDITION CODES ON MARK 


775 017430 104001 23: ERROR “1 ;CP ERROR 


L / 
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COKDAB.P 11 05-APR-84 16:45 eeeeseceeees DOUBLE OSERAKO TESTS seeesesseeseasess SEQ 0089 
477% 017432 022705 125252 3$; CMP #125252 ,R5 ;VERIFY RS 
477? 017436 001401 BEQ 4$ ;BRANCH IF GOOD 
4778 ©17440 104001 ERROR +1 ;CPU ERROR 
4779 
4780 017442 020627 001000 4$; CMP SP, @STBOT sVERIFY THAT STACK IS CORRECT 
4781 017446 001401 BEQ 15$ sBRANCH IF OK 
4782 sERROR! STACK WAS NOT CORRECT AFTER MARK 
4783 017450 104001 ERROR ol ;CPU ERROR 
a7 
4785 017452 012746 052525 158: MOV 452525, -( SP) sSETUP EXPECTED RS 
4786 017456 012746 006400 MOV #6400, -( SP) sMOVE MARK O INSTRUCTION ON STACK 
4787 017462 010605 MOV SP,.RS 3RS=ADDRESS OF INSTRUCTION 
4788 017464 004767 000004 JSR PC,5$ sLEAVE 6$ ON STACK 
4789 017470 000167 000006 6$: JMP 16$ sMARK RETURNED CORRECTLY 
47 
4791 017474 000257 58: ccc ;CLEAR THE CONDITION CODES 
4792 017476 000205 RTS RS ;RETURN TO MARK INSTRUCTION 
4793 sNEXT INSTRUCTION ON STACK IS THE RETURN 
4794 3FROM THE JSR 
4795 ;ERROR! BAD MARK SEQUENCE 
he 017500 104001 ERROR +1 ;CPU ERROR 
4) 
4798 017502 101402 16$: BLOS 7$ 31S C OR 2 BIT SET? 
4799 017504 100401 BMI 7$ :IS N BIT SET? 
4800 017506 102001 BvC 8$ :IS v BIT SET? 
4801 sERROR! CONDITIONS CODES INCORRECT 
aaet 017510 104001 7$; ERROR ol ;CPU ERROR 
4804 017512 020627 001000 8s: CMP R6,%STBOT 3IS THE STACK CORRECT? 
4805 017516 001401 BEQ 9$ ;BRANCH IF YES 
4806 sERROR! BAD STACK CLEANUP 
4807 017520 104001 ERROR +1 ;CPU ERROR 
4808 017522 022705 052525 93: CMP #52525 ,R5 sVERIFY THAT RS WAS LOADED PROPERLY. 
4809 017526 001401 BEQ 10$ ;IF OK, GO TO NEXT TEST. 
4810 sERROR! RS WAS NOT CORRECT AFTER MARK, 
4811 017530 104001 ERROR +1 ;CPU ERROR 
4812 017532 108: 
rat 017532 XME 100: 
4815 3 TEST CLEAR CONDITION CODES INSTRUCTION 
4816 017532 012737 030017 177776 MOV #30017,80177776 sSETUP PSW 
4817 017540 000257 ccc ; TEST INSTRUCTION 
4818 017542 022737 030000 177776 CMP #30000 ,80177776 :D0ID IT CLEAR ALL CONDITION CODE BITS 
4819 017550 001401 BEQ 1$ ;YES GO ON 
4820 017552 104001 ERROR ol ;CPU ERROR 
4821 3NO GO TO ERROR 
4822 017554 1$; 
4823 ; 
4824 017554 XME101: 
4825 
4826 F TEST CLEAR C BIT INSTRUCTION 
4827 017554 012737 030017 177776 MOV #30017,00177776 ;SETUP PSW 
4828 017562 000241 cLCc ; TEST INSTRUCTION 
4829 017564 022737 030016 177776 CMP #30016,0¢177776 ;DID IT CLEAR CARRY BIT 
4820 017572 001401 BEG 1$ :¥ES GO 


ON 
4531 ;C BIT NOT CLEAR GO TO ERROR 
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COKDAB.P11 


017614 
017616 


017620 
017620 


017620 
017626 
017630 
017636 
017640 


017642 
017642 
017642 
017650 
017652 
017660 
017662 
017664 
017664 
017664 
017672 
017674 
017702 
017704 
017706 
017706 
017706 
017714 
017716 
017724 
017726 
017730 
017730 


017730 
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104001 


012737 
000250 
022737 


001401 
104001 


012737 
000242 
022737 
001401 
104001 


012737 
000244 
022737 
001401 
104001 


012737 
000277 
022737 
001401 
104001 


012737 


012737 
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030017 
030007 


030017 
030015 


030017 
030013 


030000 
030017 


030000 
030001 


030000 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
177776 


177776 
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ba / 


16:45 PAGE 


be eeeeeeeee DOUBLE OpERALO TESTS eeseeseseseesseese 


1$: 


3 
TE102: 
5 


TE105: 


TE106: 


ERROR 


+1 


;CPU ERROR 


TEST CLEAR N BIT INST (CLN) 


TEST CLEAR V 


MOV 
CLV 


#30017,80177776 


#30007 ,80177776 
1$ 


#30017 ,80177776 


#30015 ,8¢177776 
1$ 
+1 


;SETUP PSwW 
; TEST INSTRUCTION 
;DID IT CLEAR NEGATIVE BIT 
;YES GO ON 
;CPU ERROR 
:NO GO TO ERROR 


BIT INST (CLV) 


;SETUP PSW 
3; TEST INSTRUCTION 
;DID IT CLEAR OVERFLOW BIT 
;YES GO ON 
;CPU ERROR 
3NO GO TO ERROR 


TEST CLEAR Z BIT INST (CLZ) 


#30017,00177776 


#30013,80177776 
1$ 


sSETUP PSW 
; TEST INSTRUCTION 
:DID IT CLEAR ZERO BIT 
:YES GO ON 

;CPU ERROR 

;NO GO TO ERROR 


TEST SET CONDITION CODES INST (SCC) 


TEST SET C BIT INST (SEC) 
MOV 


#30000 ,80177776 
#30017,80177776 


#30000 ,8177776 


#30001 ,80177776 
1$ 


;SETUP PSW 
3 TEST INSTRUCTION 
s0ID IT SET ALL CONDITION CODE BITS 
3YES GO ON 
;CPU ERROR 
sNO GO TO ERROR 


sSETUP PSW 

; TEST INSTRUCTION 

;0ID IT SET THE CARRY BIT 
;YES GO ON 

;CPU ERROR 

:NO GO TO ERROR 


TEST SET N BIT INST (SEN) 


MOV 


#30000 ,a#177776 


;SETUP PSW 


SEQ 0090 
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017736 
017740 
017746 
017750 


017752 
017752 
017752 
017760 
017762 
017770 
017772 
017/74 
017774 


017774 
020002 


020110 
020112 


020114 
020116 
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000270 
022737 
001401 
104001 


012737 
000262 
022737 
001401 
104001 


012737 


000277 


030010 


030000 
030002 


030000 
030004 


030000 


030014 


030012 


030011 


030010 


177776 


177776 
177776 


177776 
177776 


177776 


177776 


177776 


177776 


177776 


N7 
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e2e00600000¢ DOUBLE OPERAND TESTS sesesessatesaseee 


1$: 

a 
TE110: 
& 


1$: 


3 
TE111: 
3 


1$: 


; 
TE112: 
; 


1$: 


2s: 


3$: 


4$: 
. 


SEN ; TEST INSTRUCTION 
CMP #30010,80177776 ;0ID IT SET THE NEGATIVE BIT 
BEQ 1$ :YES GO ON 
ERROR +1 ;CPU ERROR 
:NO GO TO ERROR 
TEST SET V BIT INST (SEV) 
MOV #30000 ,a0177776 sSETUP PSw 
SEV ; TEST INSTRUCTION 
CMP #30002 80177776 ;DIO IT SET THE OVERFLOW BIT 
BEG 1$ :YES GO ON 
ERROR +1 ;CPU ERROR 


sNO GO TO ERROR 


TEST SET Z BIT INST (SEZ) 


= 3! #30000 ,80177776 
CMP #30004 ,80177776 
BEQ 1$ 
ERROR ol 


TEST MULTIPLE CLEARS OF 
MOV #30000 ,80177776 
scc 

-WORDB 243 

CMP #30014 80177776 
BEQ 1$ 

ERROR +1 

scc 

. 245 

CMP #30012,80177776 
BEQ es 

ERROR ol 

scc 

-WORD 246 

CMP #30011,80177776 
BEQ 3s 

ERROR 1 

scc 

. WORD 247 

cmp #30010,80177776 
BEQ 4s 

ERROR ol 

scc 

. WORD 251 


;SETUP PSw 
; TEST INSTRUCTION 
;DID IT SET THE ZERO BIT 
;YES GO ON 
;CPU ERROR 
sNO GO TO ERROR 


cc BITS 
sINIT PSw 
;SETUP PSw 
3; TEST CLC CLV 
sPSW CORRECT? 
;YES GO ON 
;CPU ERROR 
:NO GO TO ERROR 
;SETUP PSw 
s TEST CLC CiZ2 
:PSW CORRECT? 
:YES GO ON 
;CPU ERROR 
:NO GO TO ERROR 
;SETUP PSw 
; TEST CLv CLZ 
:PSwW CORRECT? 
3YES GO ON 
;CPU ERROR 
;NO GO TO ERROR 
s;SETUP PSW 
3; TEST CLC a Ci2 
sPSW CORREC 
2YES GO ON 
;CPuU ERROR 
;NO GO TO ERROR 
sSETUP PSwW 
s TEST CLN CLC 


SEQ 0091 


B8 
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COKDAB P11 OS -APR-84 16:45 eeeaceceacecoe DOUBLE OPERAND TESTS eeencscseresecoss SEQ 00%2 
4944 020120 022737 030006 177776 CMP #30006 ,80177776 sPSW CORRECT? 
4945 020126 001401 BENQ S$ svES GO ON 
4946 020130 104001 ERROR +1 sCPU ERROR 
4947 sNO GO TO ERROR 
4248 0201382 000277 S$: scc sSETUP PSW 
4949 020134 000252 -WORD 252 s TEST CLN CLV 
8950 020136 022737 030005 177776 CMP 030005 ,80177776 sPSW CORRECT? 
4951 070144 001401 BEQ 63 sYES GO ON 
4952 020146 104001 ERROR ol 3CPU ERROR 
4953 sNO GO TO ERROR 
4954 020150 000277 68; scc sSETUP PSw 
4955 020152 000253 -WORD 253 s TEST CLN CLC Civ 
49560 020154 022737 030004 177776 CMP #30004 ,80177776 sPSW CORRECT? 
4957 029162 001401 BEQ 7$ sYES GO ON 
4958 020164 104001 ERROR ol sCPU ERROR 
4959 sNO GO TO ERROR 
4960 020166 000277 7$: scc sSETUP PSw 
4961 020170 000254 . 254 s TEST CLN CL2 
4%2 020172 022737 03800038 177776 CMP 030003,89177776 sPSw CORRECT? 
4963 020200 001401 BEQ 83 3YES GO ON 
4964 020202 104001 ERROR ol sCPu ERROR 
4965 sNO GO TO ERROR 
8966 020204 000277 83: scc '  3SETUP PSW 
4967 020206 000255 -WORD 255 s VEST CL GLE Cig 
4968 020210 022737 030002 177776 CMP #30002 ,80177776 3sPSw CORRECT? 
4969 020216 001401 BEQ 93 sYES GO ON 
4970 020220 104001 ERROR ol sCPU ERROR 
4971 sNO GO TO ERROR 
4972 020222 000277 93; scc sSETUP PSw 
4973 020224 000256 " 256 s TEST CLN Civ CiZ 
4974 020226 022737 030001 177776 CMP #30001 80177776 sSETUP PSw 
4975 020234 001401 BEQ. 103 sYES GO ON 
4976 020236 104001 ERROR ol sCPuU ERROR 
4977 sNO GO 'O ERROR 
4978 020240 108: 
4979 3 
4980 020240 TE113: 
4981 : TEST MULTIPLE SETS OF CC BITS 
4982 020240 012737 030000 177776 MOV @30000 ,80177776 sINIT PSw 
4983 020246 000263 -WORD 265 3s TEST SEC SEV 
4984 020250 022737 030003 177776 CMP 030003,80177776 sPSwW CORRECT? 
4985 020256 001401 BEQ 1$ sYES GO ON 
4966 020260 104001 ERROR ol 3CPU ERROR 
4987 3NO GO TO ERROR 
4988 020262 000257 18: ccc sSETUP PSW 
4989 020264 000265 -WORD 265 s TEST SEC SEZ 
4990 020266 022737 030005 177776 CMP 930005,00177776 sPSw CORRECT 2 
4991 020274 001401 BEG es :ES GO ON 
4992 020276 104001 ERROR ol sCPU ERROR 
4993 sNO GO TO ERROR 
4994 020300 000257 2s: ccc sSETUP PSw 
4995 020302 000266 -WORD 266 s TEST SEV SEZ 
4996 020304 022737 030006 177776 CMP 030006 80177776 sPSW CORRECT? 
4997? 020312 001401 BEQ 38 sYES GO ON 
4998 020314 104001 ERROR oe | sCPU ERROR 


sNO GO TO ERROR 


C& 
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COKDAB.P11 U5 -APR-84 16:45 eeececesceseces DOUBLE OPERAND TESTS sessceseceseccecs SEQ 009% 
5000 0203816 000257 38; ccc sSETUP PSW 
5001 020320 000267 . WORD 267 s TEST SEC SEV SEZ 
S002 020322 022737 O80007 177776 CMP 930007 ,80177776 sPSW CORRECT? 
S008 020330 001401 BEQ 4$ sYES GO ON 
5004 020332 104001 ERROR ol : sCPU ERROR 
5005 sNO GO TO ERROR 
5006 020334 000257 4$: 2 sSETUP PSw 
5007 020336 000271 . WORD 271 ; TEST SEN SEC 
5008 020340 022737 O80011 177776 CMP 930011,90177776 sPSw CORRECT? 
5009 020346 001401 BEQ 5$ sYES GO ON 
5010 020350 104001 ERROR ol ;CPU ERROR 
SV1ll sNO GO TO ERROR 
S012 020352 000257 5$: ccc sSETUP PSw 
5013 020354 00027 . WORD e272 3: TEST SEN SEV 
5014 020856 022737 O80012 177776 CMP #30012,80177776 3sPSW CORRECT? 
5035 020364 001401 BEQ 63 sYES GO ON 
SOise 020366 104001 ERROR ol . 3CPU ERROR 
Soi? sNO GO TO ERROR ’ 
5018 020370 000257 63: ccc ;SETUP PSW 
50°99 020372 000273 . WORD 273 3 TEST SEN SEC SEV 
S020 020374 022737 O30013 177776 CMP 030013,80177776 :PSw CORRECT? 
5021 020402 001401 BEQ 7$ :YES GN ON 
S022 020404 104001 ERROR ol ;CPU ERROR 
5028 :NO GO TU ERROR 
5024 020406 000257 7$; ccc sSETUP PSwW 
5025 020410 000274 . WORD 274 3s TEST SEN SEZ 
5026 020412 022737 O830014 177776 CMP 030014 ,80177776 sPSW CORRECT? 
5027 020420 001401 BEQ 8$ :YES GO ON 
5028 020422 104001 ERROR ol ;CPu ERROR 
5029 sNO GO TO ERROR 
5030 020424 000257 83: ccc sSETUP PSw 
5031 020426 000275 . WORD 275 3; TEST SEN SEC SEZ 
5032 020430 022737 O30015 177776 CMP #30015,80177776 3PSw CORRECT? 
5033 020436 001401 BEQ 93 :YES GO ON 
5034 020440 104001 ERROR ol 3CPU ERROR 
5035 sNO GO TO ERROR 
5036 020442 000257 9%: ccc ;SETUP PSwW 
5037 020444 000276 . WORD 276 3: TEST SEN SEV SEZ 
5038 020446 022737 030016 177776 CMP ©30016,980177776 3PSwW CORRECT? 
5039 020454 001401 BEQ 10$ sYES GO ON 
5040 020456 104001 ERROR ol sCPu ERROR 
5041 :NO GO TO ERROR 
5042 020460 108: 
5043 3 
5044 020460 TELL3A: 
5045 : TEST SIGNED AND CONDITIONAL BRANCHES 
5046 020460 000257 ccc sCLEAR ALL CC BITS IN PSW 
5047 020462 002001 BGE 1s 38GE SHOULD BRANCH 
5048 020464 104001 ERROR ol sCPU ERROR 
5049 sERROR; DION’ T BRANCH 
5050 020466 003001 18; BGT 2s sB8GT SHOULD BRANCH 
5051 020470 104001 ERROR ol 3CPU ERROR 
5052 sERROR; DION’ T BRANCH 
5053 020472 003401 2s: BLE 3$ sBLE SHOULDN'T BRANCH 
5054 020474 000401 BR 4$ sBRANCH TO NEXT TEST 


5955 020476 104001 5$; ERROR “1 3CP ERROR 


Des 


hans KDJLL 8 CLUSTER soy 1 380.1046) OS APR-a4 -4 PAG 
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S05¢ sERROR; BLE SHOULD NOT = BRANCHED ‘ 
$057 020500 002401 48; BLT 5$ sBLT SHOULD NOT BRANCH 
5058 020502 000401 BR 6$ | BRANCH TO NEXT ane 
5059 020504 104001 S$; ERROR +1 sCPuU ERROR 
5060 sERROR; BLT SHOULD NOT HAVE BRANCHED 
5061 020506 000264 63: SEZ sSET THE Z BIT IN PSw 
5062 020510 003401 BLE 7$ sBLE SHOULD BRANCH 
5063 O20512 104001 ERROR ol 3CPU ERROR 
5064 sERROR; BLE DION’ T BRANCH 
5065 020514 003001 78: BGT 8s s8GT SHOULD NOT BRANCH 
5066 020516 000401 BR 9$ sBRANCH TO NEXT TEST 
5067 020520 104001 83: ERROR +1 ;CPU ERROR 
5068 sERROR; BGT SHOULD NOT HAVE BRANCHED 
5069 020522 000257 9$; ccc sCLEAR ALL CC BITS IN PSw 
5070 020524 000270 SEN sSET N BIT IN PSwW : 
5071 020526 002401 BLT 10$ :SMHOULD BRANCH TO NEXT TEST 
5072 020530 104001 ERROR ol 3CPU ERROR 
5073 sERROR; BLT SHOULD HAVE BRANCHED 
5074 020532 003401 108: BLE 11$ sSHOULD BRANCH TO NEXT ‘TEST 
5075 020534 104001 ERROR ol :CPU ERROR 
5076 sERROR; BLE SHOULD HAVE BRANCHED 
507 020536 002001 118: BGE 12s sBGE SHOULD NOT BRANCH 
5078 020540 000401 BR 138 sBRANCH TO NEXT TES? 
5079 020542 104001 123: ERROR ol ;CPU ERROR 
5080 sERROR; BGE SHOULD NOT HAVE BRANCHED 
5081 020544 003001 13$: BGT 14$ 38GT SHOULD NOT BRANCH 
5082 020546 000401 BR 15$ sBRANCH TO NEXT TEST 
5083 020550 1040601 148: ERROR ol ;CPU ERROR 
5084 sERROR; BGT SHOULD NOT HAVE BRANCHED 
5085S 020552 000257 158: ccc sCLEAR ALL CC BITS 
5086 020554 000262 SEV sSET Vv BIT IN PSW 
5087 020556 003401 BLE 163 sBLE SHOULD BRANCH 
5088 020560 104001 ERROR ol 3CPU ERROR 
5089 sERROR; BLE DION’ T BRANCH 
5090 020562 002401 168: BLT 178 ;BLT SHOULD BRANCH 
5091 020564 104001 ERROR ol ;CPU ERROR 
5092 sERROR; BLT DION'T BRANCH 
5093 020566 002001 17%: BGE 18$ 3B8GE SHOULON’T BRANCH 
5094 020570 00040} BR 19$ sBRANCH TO NEXT TEST 
5095 020572 104001 18%: ERROR +l ;CPU ERROR 
5096 sERROR; BGE SHOULD NOT HAVE BRANCHED 
5097 020574 003001 19%: BGT 20% 368GT SHOULD NOT BRANCH 
5098 ©C20576 000401 BR «1s sBRANCH TO NEXT TEST 
5099 020600 104001 203: ERROR ol ;CPU ERROR 
5100 sERROR; BGT SHOULD NOT HAVE BRANCHED 
5101 020602 000257 21%: ccc sCLEAR ALL CC BITS 
5102 020604 000272 . WORD 2le ;SET N AND Vv BITS IN PSW 
5103 020606 002001 BGE 22s 38GE SHOULD BRANCH 
5104 020610 104001 ERROR ol ;CPU ERROR 
5105 sERROR; BGE DION’ T BRANCH 
5106 020612 003001 22s: BGT 23s s68GT SHOULD BRANCH 
5107 020614 104001 ERROR +1 3CPuU ERROR 
5108 sERROR; BGT DION’? BRANCH ‘ 
5109 020616 003401 23%; BLE 243 ;BLE SHOULDN'T BRANCH 
5110 020620 000401 BR 25% ;BRANCH TO NEXT TEST 


S111 020622 104001 248: ERROR 1 3CPU ERROR 


F8 
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S112 sERROR; BLE SHOULD NOT HAVE BRANCHED 
5113 020624 002401 258: BLT 26% sB8LT SHOULD NOT BRANCH 
5118 020626 000401 BR 27$ sBRANCH TO NEXT TEST 
5115 020630 104001 268: ERROR ol sCPU ERROR 
5116 sERROR; BLT SHOULD NOT HAVE BRANCHED 
S117 020632 27s: 
5118 020632 TE114: 
5119 3 TEST NOP INST 
5120 020632 012737 030000 177776 MOV #30000 ,80177776 sINIT PSw 
S121 020640 012700 000001 MOV @1,RO0 sINIT RO 
S122 020644 012701 000002 MOV 62,R1 sINIT R1 
5123 020650 012702 000003 MOV 93,R2 ;INIT R2 
5124 020654 12703 000004 MOV 04,R3 sINIT R3 
5125 020660 012704 000005 MOV @5,R4 sINIT RG 
5126 020664 012705 000006 MOV 6 ,R5 sINIT RS 
5127 020670 010637 00276 MOV R6,8eSLOCOO sSAVE SP 
5128 020674 012737 030017 110502 MOV 030017, @6EXPDAT ;SETUP PSW 
5129 020702 000277 scc 3;SET ALL CONDITION CODE SITS 
5130 020704 000240 NOP ; TEST INSTRUCTION 
$131 020706 000240 NOP 3; TEST INSTRUCTION 
5132 020710 000240 NOP s TEST INSTRUCTION 
5133 020712 004767 000046 JSR PC,T114 ;CHECK PSW, AND GPR’'S 
5134 020716 020637 002762 CMP R6 ,@@SLOCOO ;CHECK SP 
5135 020722 001401 BEQ 1$ 30K GO ON 
5136 020724 104001 ERROR ol ;CPU ERROR 
5137 :NO GO TO ERROR 
5138 020726 012737 030000 110502 153: MOV #30000 , 2@E XPDAT sSETUP PSw 
5139 020734 000257 ccc sCLEAR ALL CONDITION CODE BITS 
S140 020736 000260 . WORD 260 3: TEST FOR NOP OPERATION 
5141 020740 000260 . WORD 260 3: TEST FOR NOP OPERATION 
5142 020742 000260 . WORD 260 3s TEST FOR NOP OPERATION 
5143 020744 004767 000014 JSR PC,T114 ;CHECK PSW, AND GPR’'S 
5144 020750 020637 002762 CMP R6,8eSLOCOO sCHECK SP 
5145 020754 001401 BEG 2s ;0K GO ON 
5146 020756 104001 ERROR +1 3;CPU ERROR 
5147 sNO GO TO ERROR 
5i48 020760 es: 
nes 020760 000167 000104 JMP F INNOP 
; 
5151 020764 023737 110502 177776 1114: cmP QE XPDAT ,80177776 ;CHECK PSW 
5152 020772 001405 BEQ TA114 30K GO ON 
5153 020774 010067 157400 MOV RO, 400 ;SAVE RO 
5154 021000 104001 ERROR el ;CPU ERROR 
5155 :NO GO TO ERROR 
5156 021002 016700 157372 MOV 400,RO sRESTORE RO 
5157 021006 022700 000001 TAL14: CMP #1,R0 sCHECK RO 
5158 021012 001401 BEQ 18114 30K GO ON 
5159 021014 104001 ERROR «1 ;CPU ERROR 
5160 sNO GO TO ERROR 
5161 021016 022701 000002 TB114: CMP #2,R1 sCHECK R1 
$162 021022 001401 BEQ ™C114 30K GO ON 
5163 021024 104001 ERROR o1 ;CPU ERROR 
5164 3NO GO TO ERROR 
5165 021026 022702 000003 TC114: CMP @3,R2 sCHECK R2 
5166 021032 001401 BEG T0114 30K GO ON 
5167 021034 104001 ERROR +l ;CPU ERROR 


COKDABO KDJ11 
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5168 
5169 


021036 
021042 
021044 


021046 
021052 
021054 


021056 
021062 
021064 


021066 
021070 


021072 
021074 
021076 
021100 
021102 
021104 
021106 
021114 
021122 
021124 


021126 
021132 
021134 
021136 
021140 
021142 
021144 
021152 
021160 
021162 


021164 
021166 
021170 


021172 
021174 
021176 


021200 
021202 
021204 


OS - AP’ 


022703 
001401 
104001 


022704 
001401 
104001 
022705 
001401 
104001 
000207 


000240 


B CLUSTER MACY11 
R-84 16:45 


000004 


000005 


004000 
004000 


177777 


004000 
004000 


30(1C46) O5-APR-84 


156662 
156654 


156624 
156616 


' 8 
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Peer iriy) DOUBLE OPERNIO TESTS seeeeeeseseseseee 


T0114: 


TF114; 


TG114: 


TF114 
+1 


o5,R4 
TG114 
+l 
%6,R5 
TH114 
+1 


PC 


sNO GO TO ERROR 
sCHECK R3 
30K GO ON 

;CPU ERROR 

sNO GO TO ERROR 
sCHECK R4 
30K GO ON 

;CPU ERROR 

sNO GO TO ERROR 
;CHECK RS 
30K GO ON 

;CPU ERROR 

:NO GO TO ERROR 
;RETURN 


STEST ATERNATE REGISTER SET 


1$: 


2s: 


3$: 


4$; 


9177777,RO0 
RO,R1 
R1,R2 
R2,R3 
R3,R4 
R4,R5 
#BIT11,PS 
oBIT11,PS 
es 

ol 


RO 
3% 
ol 


b------ CLEAR «e002 


ee ee es 


;SELECT ALTERNATE REGISTER SET 
sTEST TO SEE THAT BIT IS SET IN PS 
sIF IT'S SET GO TESTS REGISTERS 

sCPU ERROR 

sERROR! ALTERNATE REGISTER SELECT 
;BIT IN PS IS NOT SET 
sWRITE ALL ONES TO ALTERNATE REG SET 
é 


sCLEAR BIT 11 IN PS 
:IS BIT 11 = 0? 
;IF IT'S NOT ZERO 
;CPU ERROR 
sERROR! BIT 11 DID NOT CLEAR 
sMAKE SURE THAT WE REALLY 


sWERE TALKING TO ALTERNATE REGISTERS. 


3CPU ERROR 
sERROR! 
i 


;CPU ERROR 
;ERROR! 
F 


; 
;CPU ERROR 
sERROR! 


SEQ 00%6 
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021206 
021210 
021212 


021214 
021216 
021220 


021222 
021224 
021226 


021230 
021236 


021306 
021310 


021312 
021314 
021316 


021320 
021322 
021324 


021526 
021330 
021332 


021334 
021336 
021340 


021342 
021344 
021346 
021350 


021350 


021350 
021354 


005703 
001401 
104001 


005704 
001401 
104001 


005705 
001401 
104001 


012767 


012700 
020027 


004000 


004000 
177777 


004000 


177777 
177777 


8 CLUSTER MACY11 30( 1046) 
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156540 


156516 


156472 
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O5-APR-84 16:45 
S$: TST R3 
BEQ 6$ 
ERROR +l 
6$: TST R4 
BEQ 7$ 
ERROR ol 
7$: TST RS 
BEQ 8$ 
ERROR ol 
8$: MOV #BITLL,PS 
CLR RO 
CLR R1 
CLR Ro 
CLR R3 
CLR R4 
CLR RS 
BIC oBIT11,PS 
MOV @177777,RO 
MOV RO,R1 
MOV R1,R2 
MOV R2,R3 
MOV R3,R4 
MOV R4,R5 
BIS eBiti1, PS 
TST 
BEQ — 
ERROR +l 
93: TsT R1 
BEQ 10$ 
ERROR ol 
10$; Ts! R2 
BEQ 11$ 
ERROR ol 
11$: TST R53 
BEQ 12s 
ERROR ol 
les: TST R4 
BEQ 13$ 
ERROR +l 
13$: TST RS 
BEQ 14$ 
ERROR +l 
14%: 
ALROTS: 


ALTERNATE REGISTER SET RO Bi! TESTS 
sRO=L77777 
;D0ES RO=17 


MOV 
CMP 


9177777,RO 
RO,@177777 


SG 8 


F 
$ 
;CPU ERROR 
3 


; 
CPU ERROR 
; 

; 


e 
;CPU ERROR 
;ERROR! 


oneme 4 ape REGISTER SET 


3 - - ALTERNATE - 
4--- MEGISTER- -- 
3 -_---+* 


sBACK TO PRIMARY GPRS 
sENSURE THAT WRITES TO PRIMARY GPRS 
3D0 NOT EFFECT ALTERNATE GPRS 


3 
sRETURN TO ALTERNATE REGISTERS 
;SHOULD BE ALL O S 


3 
;CPU ERROR 
sERROR! 

+ 


3 
;CPU ERROR 
F 

F 


;CPU ERROR 
° 
H 


; 
:CPU ERROR 
3 

; 


; 
;CPU ERROR 
3 

: 


t] 
;CPU ERROR 


SEQ 9097 


COKDABO KNJ11-8 CLUSTER 
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5280 021360 001401 
S281 021362 104001 


283 021364 005000 
5284 021366 020027 
5285S 021372 001401 
5286 021374 104001 


5288 021376 012700 
5289 021402 020027 
S290 021406 001401 
S291 021410 104001 


S293 021412 012700 
5294 021416 020027 
5295 021422 001401 
5296 021424 104001 


5298 021426 
5300 021426 


$302 021426 012701 
5303 021432 020127 
5304 021436 001401 
5305 021440 104001 


5307 021442 005001 
5306 021444 020127 
5309 021450 001401 
5310 021452 104001 


5312 021454 012701 
5313 021460 020127 
5314 021464 001401 
5315 021466 104001 


5317 021470 012701 
5318 021474 020127 
5319 021500 001401 
5320 021502 104001 


S322 021504 
5324 021504 


5326 021504 012702 
5327 021510 020227 
5328 021514 001401 
5329 021516 104001 


5331 021520 005002 
5332 021522 020227 
5333 021526 001401 
5334 021530 104001 


MACY11 30( 1046) 
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000000 


125252 
125252 


052525 
052525 


177777 
177777 


000000 


125252 
125252 


052525 
052525 


177777 
177777 


OS-APR-84 16:45 PAGE 
Perce TIT Tit DOUBLE OCERMO TESTS eeeesessesesesess 


1$; 


2s: 


3$: 


1$: 


2s: 


3$: 


1$: 


BEQ 1¢ 

ERROR +1 

CLR RO 

CMP RO, 00 

BEQ 2s 

ERROR ol 

MOV #125252 ,R0 
CMP RO, 4125252 
BEQ 3$ 

ERROR ol 

MOV #52525 ,RO 
CMP RO, #52525 
BEQ 4s 

ERROR +1 


" ALTERNATE REGISTER 


0177777,R1 
CMP R1,0177777 
BEQ i$ 
ERROR ol 
CLR R1 
CMP R1,90 
BEQ es 
FRROR ol 
MOV #125252,R1 
CMP R1,4125252 
BEG 3$ 
ERROR +l 
MOV #52525,R1 
CMP R1,452525 
BEQ 4$ 
ERROR ol 


ALTERNATE REGISTER 
MOV 


@177777,R2 
CMP R2,0177777 
BEQ 1$ 
ERROR ol 
CLR R2 
CMP R2,00 
BEG es 
ERROR +1 


— 


:YES GO ON 
;CPU ERROR 
3NO GO TO-ERROR 


3NO GO TO ERROR 
3RO#125252 
sD0ES RO=125252 
3 YES GO ON 

:CPU ERROR 
:NO GO TO ERROR 
3RO252525 
3;D0ES RO=52525 
;YES GO ON 

;CPU ERROR 
:NO GO TG ERROR 


SET R1 BIT TESTS 

sR1*177777 
sDOES R1+177777 
;YES GO ON 

;CPU ERROR 
:NO GO TO ERROR 
sR1=0 
3D0ES R1=0 
sYES GO ON 

;CPu ERROR 
sNO GO TO ERROR 
3R1=125252 
sD0ES Ri=125252 
3’ES GO ON 

;CPU ERROR 
3NO GO TO ERROR 
3R1-52525 
sD0ES R1=52525 
3YES GO ON 

;CPu ERROR 
sNO GO TO ERROR 


SET R2 BIT TESTS 

3R2=177777 
sD0ES R2=177777 
:YES GO ON 

;CPU ERROR 
3NO GO TO ERROR 
3RO2= 
3;D0ES R2-0 
3YTES GO ON 

;CPU ERROR 
sNO GC TO ERROR 


SEG 9098 


COKDABO KNI11 B CLUSTER 
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021532 012702 
021536 020227 
021542 901401 
021544 104001 


021546 012702 
021552 020227 
021556 001401 
021560 104001 


021562 012703 
021566 020327 
021572 001401 
021574 104001 


021576 005003 
021600 020327 
021604 001401 
021606 104001 


021610 012703 
021614 020327 
021620 001401 
021622 104001 


021624 012703 
021630 020327 
021634 001401 
021636 104001 


021640 
021640 


021640 012704 
021044 020427 
021650 001401 
021652 104001 


021654 005004 
021656 020427 
021662 001401 
021664 104001 


021666 012704 
021672 020427 
021676 001401 
021700 104001 


021702 012704 
021706 02042” 
021712 001401 


125252 
125252 


052525 
052525 


177777 
177777 


125252 
125252 


052525 
052525 


177777 
177777 


125252 
125252 


052525 


2525 


05 APR-84 16:45 PAGE 100 
eeecseseceses DOUBLE OPERAND TESTS eeecescscsesesoes 


es: 


3$;: 


1$; 


es: 


3$: 


18: 


23: 


53; 


MOV #125252 ,R2 
CMP R2, 0125252 
BEQ 3$ 

ERROR +l 

MOV @52525,Re2 
CMP R2, 052525 
BEQ os 

ERROR 1 
ALTERNATE REGISTER 
MOV @177777,R3 
CMP R3,0177777 
BEQ 1s 

ERROR ol 

CLR R3 

CMP R3,00 

BEQ es 

ERROR ol 

MOV #125252 ,R3 
CMP R3, 0125252 
BEQ 3$ 

ERROR 1 

MOv #52525,R3 
CMP R3, 252525 
BEG 4s 

ERROR ol 


ALTERNATE REGISTER 


MOV @1L77777,R4 
CMP R4,0177777 
BEQ 1s 

ERROR 1 

CLR R4 

CMP R4,90 

BEQ es 

ERROR om | 

MOV P125252 ,R4 
cmp R481 25252 
BEQ 3$ 

ERROR ol 

MOV 052525 ,R4 

CMP R4, 852525 

BE Q 43% 


sR2=125252 
sD0ES R2-125252 


:NO GO TO ERROR 
sR2*52525 
sD0ES R2=52525 
,YES Go ON 

3CPU ERROR 
3NO GO TO ERROR 


SET R35 BIT TESTS 


sR3B2177777 
sD0ES R3=177777 
svYES GO ON 

;CPU ERROR 
3NO GO TO ERROR 
3R3=0 
;D0ES R3-0 
3YES GO ON 

;CPuU ERROR 
:NO GO TO ERROR 
3R3=125252 
3D0ES R3*125252 
;YES GO ON 

;CPU ERROR 


:NO GO TO ERROR 


R4 BI’ TESTS 

sRA=L7 7777 
sDOES R4=177777 
;YES GO ON 

;CPU ERROR 
s;NO GO TO ERROR 
3R4<-0 
;D0ES R4&=0 
sYES GO ON 

3CPU ERROR 
:NO GO TO ERROR 
3R42125252 
sD0ES R4=125252 
3TES GO ON 

3;CPU ERROR 


384252525 
sD0ES R4-50525 
37ES GO ON 


3NO GO TO ERROR 


SEQ 90% 


COKDARO KNL11 B CLUSTER 


COKD4B.P 11 


589. 
S808 
5804 


021714 
021716 
021716 


021716 
O21 722 
021726 
21730 


021732 
021734 
021740 
021742 


021744 
021750 
021754 
021756 


021760 
021764 
02177 

021772 


021774 


022002 
022002 


022004 
022010 
022014 
022020 
022024 
022026 
022032 
022034 


022036 
022040 
022042 


022044 
022050 


022052 
022056 
022062 
022066 
022070 
022074 


05 @PR 84 


104001 


012705 
020527 
001401 
104001 


012705 
020527 
001401 
104001 


042767 


005004 


012701 
012702 


021127 
001363 


012701 
012702 
012703 
010605 
011137 
106 706 


MACYL1 380( 1046) 


16:45 


004000 


022212 


177776 
177776 


177777 


022212 
022222 
0222350 


177776 


155774 


05 APR-84 16:45 PAGE 101 
eeeecesseeeos DOUBLE OPERAND TESTS seecescseccessoss 


1$; 


es: 


3$: 


1$: 


2s: 


3$; 


101%: 


ERROR “1 sCPU ERROR 
sNO GO TO ERROR 


"ALTERNATE REGISTER SET RS BIT TESTS 


0177777,R5 3R52177777 

CMP RS, o177777 sDOES R5*177777 
BEQ i$ 3 ES GO ON 
ERROR ol ;CPU ERROR 

sNO GO TO ERROR 
CLR RS 3R5= 
cmp RS, #0 sD0ES RS=-0 
BEQ es ;YES GO ON 
ERROR +1 ;CPU ERROR 

sNO GO TO ERROR 
MOV #125252 ,R5 3RS=125252 
CMP RS, 125252 sD0ES R5S=125252 
BEQ 3$ 3YES GO ON 
ERROR ol ;CPY ERROR 

sNO GO TO ERROR 
MOV #52525,R5 3R5=52525 
CMP RS5.@52525 sD0ES R5=52525 
BEQ 4$ ;YES GO ON 
ERROR +l ;CPU ERROR 

sNO GO TO ERROR 
BIC @BIT11,PS sRETURN TO PRIMARY GEN PURPOSE REGS 


TEST ow * FROM PROCCESSOR STATUS INST (MFPS) 
CLR sSETUP DESTINATION R4 


MOV #TE115A,R1 sSETUP POINTERS TO TABLES 
MOV #TEi158,R2 3 
MOV #TE115C,R3 Hy 
MOV (R1)+,80177776 s;SETUP PSw 
MFPS R4 ; TEST INSTRUCTION 
CMP @0177776,(R2)+ s;CHECK PSw 
BEQ es ;0K GO ON 
ERROR ol ;CPU ERROR 
:NO GO TO ERROR 
CMP R4,(R3)- ;CHECK R4 
BEQ 3$ ;0K GO ON 
ERROR +l ;CPU ERROR 
3NO GO TO ERROR 
CMP (R1),4177777 sARE WE DONE 
BNE 1$ sNO GO TO 1$ 
MOV #TE115A,R1 sSETUP POINTERS TO TABLES 
MOV #TE11586,R2 Fy 
MOV #TE115C,R3 3 
MOV ‘R6,RS sSAVE STACK IN RS 
MOV (R1),8@0177776 3;SETUP PSw 


MFPS R6 ; TEST INSTRUCTION 


SEG 0100 


COKDABO KDULI 
COKDAB.P 11 


022076 
022102 
022104 


022106 
022110 
O221ic 


022114 


022116 


022160 
022164 
022166 


022170 
022174 
022176 


022200 
022204 


022206 


022212 
022214 
022216 
022220 
022222 
022224 
022226 
022230 
022232 
022234 
022236 
022240 
022242 
022244 


022246 


022246 


05 -APR -84 16:45 


023712 
001401 
104001 


020613 
001401 
104001 


010506 


012701 
012702 
012703 
005037 
012704 
012137 
106724 
023722 
001401 
104001 


020427 
001401 
104001 
023723 
001401 
104001 


021127 
001354 


000167 


012737 


177776 


022212 
022222 
022236 
110502 
110502 
177776 


177776 


110503 


110502 


177777 


000032 


020000 


B CLUSTER MACYLL $0( 1046) 


177776 


I< + 


10 
eeeeeesseoes DOUBLE OPERANDS TESTS eeeeessseseseeses 


OS-APR-84 16:45 PAGE 
CMP @0177776,(R2) 
BEQ 102s 
ERROR +l 
1028; CMP R6,CR3) 
BEQ 103$ 
ERROR +1 
1038: MOV RS,RE 
MOV @TELLSA,R1 
MOV #TE1158,R2 
MOV #TE1150,R3 
CLR QE XPDAT 
4$: MOV @EXPDAT ,R4 
MOV (R1)+,80177776 
MFPS (R4)- 
CMP @¢177776,(R2)> 
BEQ 5$ 
ERROR ol 
S$: CMP R4,@EXPDAT+1 
BEQ 6$ 
ERROR ol 
6$: CMP QPEXPDAT,CR3)-> 
BEG 7$ 
ERROR +1 
78: CMP (R1),9177777 
BNE 4$ 
JMP TELLS 
3 
° 
TE115A: .WORD 30207 
«WORD 30000 
-WORD 30057 
. WORD 177777 
TE11568: .WORD 30211 
-WORD 30004 
-WORD 30041 
TE115C: .WORD 177607 
-WORD O 
-WORD 57 
TE1150: .WwORD 207 
-WORD O 
-WORDB 57 
TE115F; NOP 
é 
TE116: 


:CHECK PSw 
30K GO ON 
;CPU ERROR 


sNO GO TO ERROR 
sRESTORE STACK 


;SETUP POINTERS TO TABLES 
a 


3 
s INIT EXPECTED DATA HOLDER. 
;SETUP POINTER TO TEST LOCATION 
;SETUP PSw 
3 TEST INSTRUCTION 
;CHECK PSw 
30K GO ON 
;CPU ERROR 
:NO GO TO ERROR 
sCHECK R4 
:0K GO ON 
;CPU ERROR 
:NO GO TO ERROR 
;CHECK TEST LOCATION 
30K GO ON 
;CPU ERROR 
:NO GO TO ERROR 
;ARE WE DONE 
:NO GO TO 4$ 


TEST MOVE TO PROCESSOR STATUS INST (MTPS) 


MOV 


#30000 ,8#177776 


3SET PSW TO KERNEL MODE 


SEQ 0101 


COKDABO KNJ11 8 CLUSTER MACY11 

COKDAB.P11 05 -APR-84 16:45 
5504 022254 012701 022550 
S505 022260 012702 022526 
5506 022264 010103 
S507 022266 004767 0001356 
5508 
5509 
5510 
SS11 022272 012737 140000 
SSl2 022300 012706 000600 
5513 022304 012701 022550 
5514 022310 012702 022540 
5515 022314 010103 
SSlo 022316 004767 000106 
S517 
5518 
5519 
S520 022322 012737 140000 
S521 022330 012701 022522 
SS22 022334 012702 022540 
S523 022340 012703 022550 
S524 022344 010104 
S525 022346 004767 000110 
S526 
5527 
5528 
5529 022352 012737 030000 
5530 022360 012701 022522 
S531 022364 012702 022526 
S532 022370 012703 022550 
S533 022374 010104 
5534 022376 004767 000060 
5535 
5536 
5537 022402 005037 177776 
5538 022406 106427 177412 
5539 022412 022737 000012 
S540 022420 001401 
5541 022422 104001 
5542 
5543 022424 
5544 022424 000167 000130 
5545 
S546 022430 012105 
5547 022432 106405 
5548 022434 023722 177776 
5549 022440 001401 
S550 022442 104001 
5551 
5552 022444 022305 
5553 022446 001401 
5554 022450 104001 
5555 
S556 022452 021227 177777 
5557 022456 001364 
5558 022460 000207 


30( 1046) 


177776 


177776 


177776 


177776 


O05 -APR -84 


8 


03 
eeeeecaseeeee DOUBLE OPERAND TESTS eeeeeseeseseeeees 


100$: 


3 
T7116: 


1$: 


16:45 PAGE 
MOV #TE1160,R1 
MOV #TE116B8 ,R2 
MOV R1,R3 
JSR PC,1T116 
MOV #140000 ,80177776 
MOV #600 ,R6 
MOV #TE1160,R1 
MOV #TE116C,R2 
MOV R1,R3 
JSR PC,T116 
MOV #140000 ,80177776 
MOV @TE116A,R1 
MOV #TE116C,R2 
MOV #TE1160,R35 
MOV R1,R4 
JSR PC,TA116 
MOV #30000 ,80177776 
MOV @TE116A,R1 
MOV #TE116B,R2 
MOV #TE1160,R3 
MOV R1,R4 
JSR PC,TAL16 
CLR 80177776 
MTPS #177412 
CMP #12,80177776 
BEQ 100$ 
ERROR ol 
JMP FIN116 
MOV (R1L)+,R5 
MTPS RS 
CMP 9¢177776,(R2)> 
BEQ 1$ 
ERROR ol 
CMP CR3)+,R5 
BEQ es 
ERROR +1 
CMP CR2),0177777 
BNE T116 
RTS PC 


sSETUP POINTERS TO TABLES 
& 


é 
s TEST INSTRUCTION AND CHECK PSW 
sAND SOURCE OPERAND 


;SET PSW TO USER MODE 
sSETUP USER STACK 

sSETUP POINTERS TO TABLES 
° 


i 
s TEST INSTRUCTION AND CHECK PSW 
sAND SOURCE OPERAND 


sSET PSW TO USER MODE AND CLEAR CC BITS 
;SETUP POINTERS TO TABLES 
a 


3 

sSAVE A COPY OF R1 INTO R4 

; TEST INSTRUCTION AND CHECK PSW 
sAND SOURCE OPERAND 


3SET PSW TO KERNEL MODE 
sSETUP POINTERS TO TABLES 
5 


3 

sSAVE A COPY OF R1 INTO R4 

; TEST INSTRUCTION AND CHECK PSW 
sAND SOURCE OPERAND 


;SET PSW TO KERNEL MODE 
sTEST INSTRUCTION 
:IS PSW CORRECT 
;YES GO ON 
;CPU ERROR 
:NO GO TO ERROR 


sMOVE TEST DATA TO RS 
3; TEST INSTRUCTION 
3IS PSW CORRECT 
;YES GO ON 

;CPU ERROR 

;NO GO TO ERROR 
:IS RS CORRECT 
:YES GO ON 

;CPU ERROR 

3NO GO TO ERROR 
;ARE WE DONE 
sNO GO TO 1116 
;RE TURN 


SEQ 0102 


M& 


COKDABO KDJ11 8 CLUSTER MACY11 30(1046) OS-APR-84 16:45 PAGE 104 
COKDAB.P11 05 -APR-84 16:45 eeeeeeeeeaes DOUBLE OPERAND TESTS seesensseesseeses SEQ 0103 
5560 022462 106421 TAL16: MTPS (R1)+ + TEST INSTRUCTION 
5561 022464 023722 177776 CMP 80177776,CR2)+ 31S PSW CORRECT 
5562 022470 001401 BEQ 1$ sYES GO ON 
5563 022472 104001 ERROR 1 sCPU ERROR 
5564 sNO GO TO ERROR 
5565 022474 122423 1$: CMPB (R4)+,CR3)> sCHECK TEST LOCATION 
5566 022476 001401 BEQ 2s 30K GO ON 
5567 022500 104001 ERROR +1 :CPU ERROR 
5568 :NO GO TO ERROR 
5569 022502 020104 2s: CMP R1,R4 3IS SOURCE OPERAND CORRECT 
5570 022504 001401 BEQ 3$ 3YES GO ON 
5571 022506 104001 ERROR +1 ;CPU ERROR 
5572 ;NO GO TO ERROR 
5573 022510 005203 3$: INC R3 sPOINT TO NEXT WORD 
5574 022512 021227 177777 CMP (R2),4177777 ;ARE WE DONE 
5575 022516 001361 BNE TA116 sNO GO TO TA116 
ode 022520 000207 RTS PC ;RE TURN 
3 
5578 022522 377 TE116A: .BYTE 377 
5579 022523 000 OTte © 
5580 022524 252 BYTE 232 
5581 022525 125 -BYTE 125 
S582 022526 030357 TE1168: .WORD 30357 
5583 022530 030000 -WOR? 30000 
5584 022532 030252 -WORD 30252 
5585 022534 030105 -WORD 30105 
S586 022536 177777 -WORD 177777 
S587 022540 140017 TE116C: .WORD 140017 
5588 022542 140000 -WORD 140000 
5589 022544 140012 «WORD 140012 
5590 022546 140005 -WORD 140005 
S591 022550 177777 TE1160: .WORD 177777 
5592 022552 177400 -WORD 177400 
5593 022554 177652 -WORD 177652 
cone 022556 177525 «WORD 177525 
; 
5596 022560 . FIN116: 
5597 ; 
5598 022560 TE117: 
5599 ; TEST MFPT (MOVE FROM PROCESSOR TYPE) 
5600 022560 013746 000010 MOV a10, -(SP) ;SAVE VECTOR 
5601 022564 012737 022672 000010 MOV #TE117A,a010 ;SETUP VECTOR TO HANDLE POSSIBLE ILLEGAL INST TR 
S602 022572 012700 177777 MOV #177777,RO ; INIT RO 
5603 022576 012737 030000 177776 MOV #30000 ,80177776 ;SETUP PSW 
5604 022604 000007 -WORD 7 ; TEST INSTRUCTION 
5605 022606 022737 030000 177776 CMP #30000 ,80177776 ;IS PSW CORRECT 
5606 022614 001401 BEQ 1$ ;YES GO ON 
5607 022616 104001 ERROR +1 ;CPU ERROR 
5608 :NO GO TO ERROR 
5609 022620 020027 000005 1$: CMP RO, #5 ;IS RO CORRECT 
5610 022624 001401 BEQ 2s 3YES GO ON 
5611 022626 104001 ERROR +1 ;CPU ERROR 
5612 :NO GO TO ERROR 
5613 022630 012700 177777 2s: MOV #177777,R0 :INIT RO 
5614 022634 000277 scc ;SET ALL CC BITS 


5615 022636 000007 . WORD 7 ; TEST INSTRUCTION 


N8 


COKDABO KDJ11 8B CLUSTER pond! 30( 1046) O5S-APR-84 16:45 PAGE 
COKDAB .P11 -84 4s DOUBL 


022742 
022744 


022746 
022752 
022760 
022762 
022764 
022772 
022774 


022776 


05-APR 


022737 
001401 
104001 


020027 
001401 
104001 
012637 
000167 


104001 


000240 


022737 
001401 
104001 


022737 
001401 
104001 


022627 
001401 
104001 


022627 
001401 
104001 


012637 
012637 


122767 


030017 


000005 


000010 
000002 


030000 


000200 


022744 


140000 


177776 


155040 


177776 


177766 


156164 


SO64O44464OO 


3$: 


4$;: 


3 
TE117A; 


G 
FIN117: 


3 
TE120: 
3 


PROCNT: 


—e- oF 


1$: 


2s: 


38; 


FIN12O: 


3 
TE121: 
3 


E120A: 


CMPB @APTENV, SENV 


105 
E OPERAND TESTS seeeessesenseeeene 


3IS PSW CORRECT 
:YES GO ON 

;CPU ERROR 

:NO GO TO ERROR 
:IS RO CORRECT 
3YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 
sRESTORE VECTOR 


;CPU ERROR 
;GO TO ERROR IF TRAP TAKES PLACE 


sINIT CPU ERROR REG 

sINIT PSW-SET KERNEL MODE 
sSAVE VECTOR 

sSAVE VECTOR 


3SET UP VECTOR TO HANDLE ILLEGAL HALT 
sSET UP VECTOR TO COME BACK IN KERNEL MODE 


;SET IN USER MODE 


sINITIALIZE THE USER STACK POINTER 


; TEST INSTRUCTION 

;CPU ERROR 

3IF NOTHING HAPPENED GO TO ERROR 
i 


:IS PSW CORRECT/PREVIOUS MODE = USER? 


;YES GO ON 
;CPU ERROR 
3;NO GO TO ERROR 
; TEST CPU ERROR REGISTER 
;YES GO ON 
;CPuU ERROR 
3;NO GO TO ERROR 
300ES STACK CONTAIN CORRECT PC 
;YES GO ON 
;CPuU ERROR 
s;NO GO TO ERROR 
sD0ES STACK CONTAIN CORRECT PSw 
:;YES GO ON 
;CPU ERROR 
:NO GO TO ERROR 
sRESTORE VECTOR 
sRESTORE VECTOR 


CMP #30017 ,80177776 
BEQ 3$ 

ERROR +1 

CMP RO, #5 

BEQ 4$ 

ERROR +1 

JMP FINi17 

ERROR +1 

NOP 

TEST HALT CNOT KERNEL MODE) 
CLR 80177766 

CLR 80177776 

MOV @04,-(SP) 
MOV 06, -( SP) 
MOV #TE120A,a04 
CLR 206 

MOV #140000 ,PS 
MOV #600 ,R6 

HALT 

ERROR +1 

JMP FIN120 

CMP #30000 ,80177776 
BEG 1$ 

ERROR +1 

CMP 0209 ,80177766 
BEQ 2s 

ERROR +1 

CMP (SP )+, @PROCNT 
BEQ 3$ 

ERROR +1 

cmP (SP +, #140000 
BEQ FIN120 

ERROR +1 

MOV (SP )+ ,a06 
MOV (SP )+,a04 
TEST RESET 


;ARE WE IN APT MODE? 


SEQ 0104 


BY 
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COKDAB.P11 05 -APR-84 16:45 oeeeeeeeeeee DOUBLE OPERAND TESTS cecccsccecsoccoce 5EQ 0105 
So72 023034 001002 BNE 18 aIF NOT: DO THIS TEST 
56753 023036 000167 000622 JMP FINI22 sELSE SKIP THIS TEST BECAUSE RESETS 
5674 sSCREW UP THE APT MONTTOR, 
5675 023042 012737 030340 177776 i$: MOV 030340 80177776 sSETUP PSW TO KERNEL MODE 
7e 023050 012737 160000 177572 MOV #160000 ,80177572 sSETUP MMRO 
7? 023056 012737 000077 172516 MOV 077,80172516 sSETUP MMRS 
5678 023064 005037 177772 CLR 80177772 sCLEAR PIRG 
S679 023070 023727 177772 000000 CMP 80177772,00 sIS PIRQ@ CORRECT 
5680 023076 001401 BEQ C1i2:a sYES GO ON 
5681 023100 104001 ERROR o1 3CPU ERROR 
5682 sNO GO TO ERROR 
5083 023102 012737 025000 177772 C121A: MOV 925000 ,80177772 sMOVE AN ALTERNATING PATTERN 10 PIRG 
5684 023110 022737 025252 177772 CMP 925252 ,80177772 sIS PIRQ CORRECT 
5685 023116 001401 BEQ C1218 sYES GO ON 
5686 023120 104001 ERROR ol sCPU ERROR 
5087 sNO GO TO ERROR 
5688 023122 012737 077000 177772 (C1218: MOV 977000 ,80177772 sSETUP PIRQ 
5689 023130 022737 077314 177772 CMP 077314,80177772 sIS PIRG CORRECT! 
5690 023136 001401 BEQ C121C sYES GO ON 
5691 023140 104001 ERROR ol 3CPU ERROR 
5692 sNO GO TO ERROR 
5693 023142 000277 Ci2ic: scc sSET ALL CC BITS 
5694 023144 000005 RESET s TEST INSTRUCTION 
5695 023146 022737 030357 177776 CMP @30357,80177776 sIS PSw CORRECT 
S696 023154 001401 BEQ 18 sYES GO ON 
5697 023156 104001 ERROR- ol ;CPU ERROR 
5698 sNO GO TO ERROR 
5699 023160 013701 177572 18; MOV 84SRO,R1 3SAVE SRO IN Rl. 
S700 023164 042701 000176 BIC 0176,R1 sSTRIP OFF UNDEFINED BITS 1-6 FROM MMRO 
5701 023170 022701 000000 CMP 00,R1 3IS MMRO CORRECT 
5702 023174 001401 BEQ 2s 3¥ES GO ON 
5703 023176 104001 ERROR ol :CPuU ERROR 
5704 389 GO TO ERROR 
S705 023200 022737 000000 172516 2%: CMP 00 ,80172516 31S MMRS CORRECT 
5706 023206 001401 BEQ 33 3YES GO ON 
5707 023210 104001 ERROR ol :CPL' ERROR 
5708 :NO GO TO ERROR 
S709 023212 022737 000000 177772 38: CMP 00,80177772 31S PIRQ CORRECT 
5710 023220 001401 BEQ 43% 3vES GO ON 
5711 023222 104001 : ERROR ol 3<PU ERROR 
ey 3°00 GO TO ERROR 
5714 023224 013702 000004 4%; MOV w04 ,R2 sSAVE LOC 4 IN R2 
5715 023230 013703 000006 MOV 806 R53 sSAVE LOC 6 IN R3 
5716 023234 012737 023372 000004 MOV 08% ,204 ;SETUP VECTORS IN CASE AN ERROR CAUSES 
5717 sA HALT TO OCCUR IN USER MODE. 
5718 023242 012737 000340 000006 MOV 9340 ,206 sTHIS SETS KERNEL MODE, AND PREVENTS PRIQ 
5719 sINTERRUPTS FROM TRASHING THE STACK IF A 
5720 sUSER MODE HALT OCCURS. 
5721 023250 012737 140340 177776 MOV 0140340,80177776 sSETUP PSw TO USER MODE 
5722 023256 012737 1€0000 177572 MOV #160000 80177572 sSETUP MMRO 
5723 023264 012737 000077 172516 MOV 077,@017°516 sSETUP MMRS 
5724 023272 012737 077000 177772 MOV 077000 ,@@1777?. sSETUP PIRQ 
5725 023300 000277 scc sSET ALL CC BITS 
5726 023302 000005 RESET s TEST INSTRUCTION 


S727 023304 022737 140357 177776 CMP 0140357,a0177776 31S PSw CORRECT 


io 
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COKDAB.P11 05-APR-84 16:45 eeeeseeecoss DOUBLE OPERAND TESTS seesescecccsacoes SEG 0106 
S728 023312 001402 BEQ 5$ sYES GO ON 
S729 023314 000000 HALT USER MODE HALT; WILL TRAP TO LOC 4 
S730 023316 104001 ERROR +1 sCPU ERROR 
$731 sNO GO TO ERROR 
S732 023320 013701 177572 5$: MOV 80177572,R1 sSAVE MMRO IN R1 
5738 023324 042701 000176 BIC 4176,R1 sCLEAR BITS 1-6 FROM MMRO 
5734 023330 022701 160000 CMP #160000,R1i 3IS MMRO CORRECT 
5735 023334 001402 BEQ 63% sYES GO ON 
5736 023336 000000 HALT sUSER MODE HALT; WILL TRAP TO LOC 4° 
S737 023340 104001 ERROR ol ;CPU ERROR 
5738 sNO GO TO ERROR 
5739 023342 022737 000077 172516 6%: CMP 077,80172516 31S MMR3 CORRECT 
5740 023350 001402 BEQ 7$ sYES GO ON 
5741 023352 000000 HALT sUSER MODE HALT; WILt TRAP 10 .0C 4 
S742 023354 104001 ERROR 1 ;CPU ERROR 
574s sNO GO TO ERROR 
5744 023356 022737 077314 177772 78: CMP 477314,80177772 3IS PIRQ CORRECT 
5745S 023364 001403 BEQ 9% s¥ES GO ON 
5746 023366 ©C00000 HALT sUSER MODE HALT; WILL TRAP 10 LOC 4 
5747 023370 104001 ERROR ol sCPU ERROR 
5748 sNO GO TO ERROR 
pee 023372 000002 8S; RTI sUSER MODE HALT OCCURRED; GO TO ERROR. 
5751 023374 005037 177772 93: CLR 80177772 sCLEAR PIRQ 
S752 023400 005037 177776 CLR 80177776 sCLEAR PSw 
$753 023404 010237 000004 MOV R2,904 sRESTORE VECTORS TO PREVIOUS STATE 
5754 023410 010337 000006 MOV R3,906 3 
S755 023414 FINI21: 
5750 3 
S757 023414 TEL2e: 
Bree 3 TEST SPL (SET PRIORITY LEVEL ) 
5760 023414 012705 000010 MOV 08. RS sINIT COUNTER 
5761 023420 012701 023644 MOV OTL22F,R1 sSETUP POINTER TO DATA 
S762 023424 012737 030000 177776 18: MOV #30000 ,80177776 sINIT PSw 
S763 023432 004767 000054 JSR PC,T122A s TEST INSTRUCTION 
5764 023436 022137 177776 CMP (RL )+ ,@O17777%6 315 PSw CORRECT 
S765 023442 901401 BEQ es sYES GO ON 
5766 023444 104001 ERROR ol sCPU ERROR 
570? :NO GO TO ERROR 
tee 023446 077512 2s: S08 R5,18 sREPEAT UNTIL ALL CASES ARE TESTED 
5770 
5771 023450 012705 000010 MOV 08. ,RS sINIT COUNTER 
5772 023454 012737 140000 177776 38: MOV #140000 ,90177776 sSETUP PSW TO USER MODE 
S773 023462 912706 000600 MOV 06,00 ,Re sSETUP USER STACK 
5774 023466 004767 000020 JSa PC, TL22A s TEST INSTRUCTION 
5775 023472 022737 140017 177776 cmp ©140017,80177776 sIS PSw CORRECT 
5776 023500 001401 BEQ 43 sYES GO ON 
5777 023502 104001 ERROR ol sCPuU ERROR 
5778 3sNO GO TO ERROR 
ghey 023504 077515 43; 508 R5, 5% sREPEAT UNTIL ALL CASES ARE TESTED 
~ 
5781 
5782 023596 000167 000152 JMP FINI22 


DY 
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5784 023512 020527 000010 T122A: CMP R5,08. sF IND OUT WHAT COUNTER I5 
5785 023516 001003 BNE 1$ sIF NOT PRIORITY O GO TO 138 
5786 023520 000277 scc sSET ALL CC BITS 
5787 023522 000230 SPL 0 sSET PRIORITY TO 0 
5788 023524 000446 BR 83 3RE TURN 
5782 023526 020527 000007 L$: CMP R5,07 sF IND OUT WHAT COUNTER IS 
5790 023532 001003 BNE 2s sIF NOT PRIORITY 1 GO TO 28 
5791 023534 000277 scc SET ALL CC BITS 
5792 023536 000231 SPL 1 sSET PRIORITY TO 1 
5793 023540 000440 BR me 3RE TURN 
5794 023542 020527 000006 2s: CMP R5,%6 sF IND OUT WHAT COUNTER IS 
5795 023546 001003 BNE 3$ sIF NOT PRIORITY 2 GO TO 3$ 
5796 023550 000277 scc SET ALL CC BITS 
5797 023552 000232 SPL 2 ;SET PRIORITY TO 2 
5798 023554 000432 BR 8$ ;RE TURN 
5799 023556 020527 000005 3$; CMP R5,05 sF IND OUT WHAT COUNTER IS 
5800 023562 001003 BNE 43 ;IF NOT PRIORITY 3 GO TO 4$ 
5801 023564 000277 scc 3SET ALL CC BITS 
5802 023566 000233 SPL ' sSET PRIORITY TO 3 
5803 023570 000424 BR 8$ ;RE TURN 
5804 023572 020527 000004 4$: CMP R5,04 3F IND OUT WHAT COUNTER IS 
5805 023576 001003 BNE S$ sIF NOT PRIORITY 4 GO TO S$ 
5806 023600 000277 scc SET ALL CC BITS 
5807 023602 000234 SPL 4 sSET PRIORITY TO 4 
5808 023604 000416 BR 8s 3RE TURN 
5809 023606 020527 000003 S$: CMP R5,03 sF IND OUT WHAT COUNTER IS 
5810 023612 001003 BNE 6$ :IF NOT PRIORITY 5S GO TO 6$ 
5811 023614 000277 scc 3SET ALL CC BITS 
5812 023616 000235 SPL 5 3SET PRIORITY TO S 
5813 023620 000410 BR 83 3RE TURN 
5814 023622 020527 000002 43: CMP R5,02 sF IND OUT WHAT COUNTER IS 
5815 023626 001003 BNE 7$ sIF NOT PRIORITY 6 GO TO 7$ 
5816 023630 000277 scc 3SET ALL CC BITS 
5817 023632 000236 SPL 6 ;SET PRIORITY TO 6 
5818 023634 000402 BR 8$ 3RE TURN 
5819 023636 000277 7$; scc 3SET ALL CC BITS 
5820 023640 000237 SPL ? 3SET PRIORITY TO ? 

3821 023642 000207 83: RTS PC 3RE TURN 
rf 
5823 023644 030017 T122B: .WORD 30017 
5824 023646 030057 .WORD 30057 
5825 023650 030117 WORD 30117 
5826 023652 030157 .WORD 30157 
5827 023654 030217 WORD 30217 
5828 023656 030257 .WORD 30257 
5829 023660 030317 D0 30317 
5830 023662 030357 WORD 303857 
5831 023664 000240 FIN122: NOP 
5832 3 
5833 023666 TE123: 
5834 ; TEST TSTSET INSTRUCTION (MUL"I PROCESSING INST) 
5835 023666 005037 177776 CLR @0177776 sIuIt PSw 
5836 023672 012703 000012 MOV #10. ,R3 ; INIT COUNTER 
5837 023676 012701 000400 MOV 400,R1 3SETUP DESTINATION 
5838 023702 012700 024050 MOV 0T123A,RO 3SETUP SOURCE 


5839 023706 012021 100$; MOV CROD+, CRI) sRELOCATE TABLES 


£9 
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5840 023710 077302 S08 R3,100$ sARE WE DONE 
$841 023712 013746 000010 MOV @@10, -(SP) sSAVE VECTOR 
5842 023716 012737 024074 000010 MOV #T1230,8010 sSETUP NEW VECTOR 
5843 023724 005000 CLR RO sINIT RO 
5844 023726 012701 000400 MOV 0400,R1 sSETUP POINTERS TO TABLES 
5845 023732 012702 000410 MOV 0410,Re 5 
$846 023736 012703 000416 MCV 0416,R3 : 
5847 023742 010104 MOV R1,R4 ; 
S848 023744 012737 O80000 177776 18: MOV 30000, 80177776 sSETUP PSW 
5849 023752 000262 SEV sSET Vv BIT 
S850 023754 007221 . WORD 7221 s TEST INSTRUCTION 
5851 023756 022237 177776 cMP (R2)+,90177776 sIS PSwW CORRECT 
$852 023762 001401 BEQ es stES GO ON 
5853 023764 104001 ERROR “1 sCPU ERROR 
5854 sNO GO TO ERROR 
5855 023766 020013 es: CMP RO,(R3) 3IS RO CORRECT 
S856 023770 001401 BEQ 3$ sYES GO ON 
5857 023772 104001 ERROR ol sCPU ERROR 
5858 sNO GO TO ERROR 
5859 O23774 005204 3$; INC Ra ;SETUP EXPECTED DATA 
5860 023776 005204 INC R4 ; 
5861 024000 020401 CMP R4,R1 sIS Ril CORRECT 
S862 024002 001401 BEQ 4$ ;YES GO ON 
5863 024004 104001 ERROR ol sCPU ERROR 
5864 :NO GO TO ERROR 
5865 024006 052713 000001 4$: BIS #1,(R3) sSETUP EXPECTED DATA 
5866 024012 022341 CMP (R3)+,-CR1) sIS TEST LOCATION CORRECT 
5867 024014 001401 BEQ 5$ 3YES GO ON 
5868 024016 104001 ERROR ol :CPU ERROR 
5869 sNO GO TO ERROR 
5870 024020 005201 S$: TNC R1 sPOINT TO NEXT TEST LOCATION 
5871 024022 005201 INC Ri ; 
S872 024024 021127 177777 CMP (RL), @177777 sARE WE DONE 
5873 024030 001345 BNE 1$ sNO GO TO 1$ 
5874 024032 012737 024076 000010 MOV @T123E ,a010 sSETUP NEw VECTOR 
5875 024040 007201 . WORD 7201 3; TEST INSTRUCTION ILLEGAL MODE 
5876 024042 104001 ERROR ol sCPuU ERROR 
3877 3GO TO ERROR IF DION’ T TRAP 
5878 024044 000167 000032 JMP T125F 
5879 ; 
5880 ; 
5881 024050 167604 T123A: .WORD 167604 
5882 024052 000000 2 . WORD 
5883 024054 000001 -WORD 1 
5884 024056 177777 »WORD 177777 
5885 024060 030010 T1238: .WORD 30010 
5886 024062 030004 -WORD 30004 
5887 024064 030001 -WORD 30001 
5888 024066 167604 T123C: .WORD 167604 
5889 024070 000000 -WORD O 
5890 024072 000001 -WORD 1 
5891 024074 104001 T1230: ERROR ol sCPU ERROR 
5892 3G0 TO ERROR IF TRAPPED 
5893 024076 005726 T1I25E: TST (SP )- sCLEAN UP STACK 
5894 024100 005726 TST (SP )- H 
5895 024102 012637 000010 T1235F: MOV (SP )+ ,av10 sRESTORE VECTOR 
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024106 


024106 
024112 
024116 
024122 
024126 
024130 
024132 
024136 
024144 
024150 
024154 
024160 
024162 
024170 
024172 
024176 
024200 
024202 
024204 
024206 
024210 
024212 
024214 
024220 
024222 


024224 


024226 
024230 


024232 
024234 
024236 
024240 
024242 


024244 
024246 
024250 


024252 
024254 
024256 
024262 
024264 
024272 
024274 


024276 


024302 
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022142 
001401 
104001 


005202 
005202 
021127 
001337 
012737 
007302 
104001 


000167 


167604 


177776 
000012 


000400 
024302 


024326 000010 


030000 177776 


177776 


177777 
024330 000010 


000032 
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AGE 110 
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100$; 


1$: 


5$; 


6$: 


7$: 


124A; 


CLR 84177776 

MOV 310. .R3” 

MOV #400 ,R1 

MOV oT124A, RO 
MOV (RO)+,CR1)> 
S08 R3,100$ 

MOV 8010, -( SP) 
MOV #71240,8010 
MOV #400 ,R1 

MOV #410,R2 

MOV 0416,R3 

MOV R2,R4 

MOV #30000 ,80177776 
MOV (R1),RO 

CMP R3,0416 

BEQ 2s 

BR 3$ 

SEC 

BR 4s 

CLC 

SEV 

. WORD 7322 

CMP (R3)+,80177776 
BEQ 5$ 

ERROR +1 

CMP (R1),RO 

BEQ 6$ 

ERROR el 

INC R4 

INC RS 

CMP R2,R4 

BEQ 7$ 

ERROR +1 

CMP CR1)+, -CR2) 
BEQ 8$ 

ERROR ol 

INC Ro 

INC R2 

CMP (R1),@177777 
BNE 1$ 

MOV @T1l24E ,ae10 
» WORD 7302 

ERROR el 

JMP TLOaF 

~ WORD 167604 


TEST WRILCK (WRITE LOCK MULTI iT Pam INST) 


sINIT COUNTER 

sSETUP DESTINATION 

sSETUP SOURCE 

sRELOCATE TABLES 

sARE WE DONE 

s;SAVE VECTOR 

;SETUP NEW VECTOR 

sSETUP POINTERS TO TABLES 
6 

3 


+ 

;SETUP PSW 

sSETUP RO 

31S THIS THE FIRST TEST CASE 
sf—S GO TO 2s 

sNO GO TO 3$ 

3SET C BIT 


3 
;CLEAR C BIT 
3SET Vv BIT 
; TEST INSTRUCTION 
:IS PSW CORRECT 
;YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 
3IS RO CORRECT 
3YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 
;SETUP EXPECTED DATA 


3 
31S R2 CORRECT 
3YES GO ON 
;CPU ERROR 
3;NO GO TO ERROR 
3IS TEST LOCATION CORRECT 
3YES GO ON 
;CPU ERROR 
s;NO GO TO ERROR 
sPOINT TO NEXT TEST LOCATION 


F 

;ARE WE DONE 

3;NO GO TO 1$ 

;SETUP NEW VECTOR 

; TEST INSTRUCTION ILLEGAL MODE 
3;CPU ERROR 
3GO TO ERROR IF DION’ T TRAP 


SEQ 0109 
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024304 
024306 
024310 
024312 
024314 
024316 
024320 
024322 
024324 
024326 


024330 
024332 
024334 


024340 


024340 
024344 


024350 
024354 
024362 
024366 
024370 
024372 
024376 
024404 
024406 


024410 
024414 
024416 


024420 
024424 
024426 


024430 
024436 
024440 


024442 
024446 
024452 


024454 
024460 
024460 
024462 
024466 


000000 
000001 
177777 
177777 
177777 
177777 
030011 
030004 
030000 
104001 


005726 
005726 
012637 


005037 
012701 


010137 
062737 
012703 
011102 
000277 
070261 
026137 
001401 
104001 


026103 
001401 
104001 


026102 
001401 
104001 


026177 
001401 
104001 


062701 
020127 
001336 


012701 


010102 
012706 
012704 


000010 


177776 
024600 


110502 
000002 
122222 


000002 
000004 


000010 


000002 


000012 
025026 


110502 


177776 


064044 


G9 
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T1248: 
T124C: 


T1240: 
T124E; 
T124F ; 


3 
TE125: 
Hy 


1$: 


2s: 
3%; 
4$: 


5$: 


° 177777 
«WORD 30011 
«WORD 30004 
-WORD 30000 
ERROR +1 ;CPU ERROR 
3G0 TO ERROR IF TRAPPED 
TST (SP )+ ;CLEAN UP STACK 
TST (SP )-> ; 
MOV (SP )+,a010 sRESTORE VECTOR 


TEST MUL (MULTIPLY INST) 


CLR 84177776 s INIT 
MOV @TE125A,R1 Ce TUP POINTERS TO TABLES 
MOV R1,@0EXPDAT ; 
ADD 02, 30EXPDAT sPOINT TO SOURCE 
MOV #122222 ,R3 sINIT R3 TO A KNOWN STATE 
MOV (R1),R2 s INIT DESTINATION REG 
scc sSET ALL CC BITS 
MUL 2(R1),Re2 :_ TEST INSTRUCTION 
CMP 4(R1),80177776 3IS PS CORRECT 
BEQ es :YES GO ON 
ERROR +l ;CPU ERROR 
sNO GO TO ERROR 
CMP 6(R1),R3 sIS R3 CORRECT 
BEQ 3$ ;YES GO ON 
ERROR +1 ;CPU ERROR 
3NO GO TO ERROR 
CMP 10(R1),R2 sIS R2 CORRECT 
BEQ 4$ 3YES GO ON 
ERROR +1 sCPU ERROR 
3NO GO TO ERROR 
CMP 2(R1), DE XPDAT :IS — LOCATION OK 
BEQ S$ ;YES GO ON 
ERROR +l :CPU ERROR 
sNO GO TO ERROR 
ADD #12,R1 sGO TO NEXT TEST 
CMP R1,4F INI2S sARE WE FINISHED 
BNE 1$ sNO GO TO 1$ 


é 
3SECOND PART 
sUSING ODD REGISTER 


; 
63: 
7$; 


MOV @TE125A,R1 sSETUP POINTERS TO TABLES 
MOV R1,R2 : 

MOV @STBOT ,R6 sINIT R6 TO A KNOWN STATE 
MOV 04,R4 sSETUP R4 VALUE 


SEQ 0110 


HY 
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SEQ O111 


©6008 024472 011105 MOV (R1),R5S sINIT DESTINATION REG 

©009 024474 000277 scc sSET ALL CC BITS 

©6010 024476 070561 000002 MUL 2(R1),R5 s TEST INSTRUCTION 

©6011 024502 026137 OO00008 1777 CMP 4(R1),90177776 3IS PS CORRECT 

e012 024510 001401 BEQ 8s :YES GO ON 

©0138 O24512 104001 ERROR +1 ;CPU ERROR 

014 3NO GO TO ERROR 

©015 024514 026105 000006 8S: chp 6(R1),R5 :I1S RS CORRECT 

6016 024520 001401 BEQ 9$ sYES GO ON 

6017 024522 104001 ERROR ol ;CPU ERROR 

©6018 sNO GO TO ERROR 

6019 024524 020627 001000 9%: CMP R6,oSTBOT 3IS R6 CORRECT 

6020 024530 001403 BEG 10$ sYES GO ON 

6021 024532 012706 001000 MOV &STBOT ,R6 sRESTORE SP 
ee 024536 104001 ERROR ol ;CP:) ERROR 

6028 sNO GO TO ERROR 

6024 024540 005722 10$; TsT (R2)- sPOINT TO SOURCE OPERAND 

6025 024542 021261 000002 CMP CR2),2(R1) 3IS SOURCE LOCATION OK 

©026 024546 001401 BEQ 11$ :YES GO ON 

6027 024550 104001 ERROR ol ;CPu ERROS 

6028 3NO GO TO ERROR 

6029 224552 020427 000004 118: CMP R4,04 3IS R4& CORRECT 

6030 024556 001401 BEQ 12$ :YES GO ON 

6031 024560 104001 ERROR el ;CPU ERROR 

6032 :NO GO TO ERROR 

©033 024562 062701 vv0001l2 les: ADD #12,R1 3 

6034 024566 020127 025026 CMP R1, oF INLC5 sARE WE F INISHED 

6035 024572 001332 BNE 7$ sNO GO TO 7$ 

6030 

6037 

6038 024574 000167 000226 jmp FIN1I2S 

6039 : 

6040 3 

6041 024600 177777 TEL2SA:;: .WORD 177777 sMUL TIPL ICAND 

6042 624602 177777 . WORD 177777 sMULTIPLIER 

6043 024604 000000 ‘ o to) 

6044 024606 000001 . WORD 1 

6045 024610 000000 . WORD 0 

6047 024512 006772 . WORD 6772 sMUL TIPL ICAND 

£048 024614 100000 WORD 100000 sMULTIOL_IER 

6049 024616 000011 . WORD 11 

6050 024620 000000 . WORD o) 

— 2 024622 174403 . WORD 174403 

6053 024624 177777 . WORD 177777 sMULTIPL ICAND 

6054 024626 077777 WORD 77777 sMULTIPLIER 

6055 024630 000010 WORD 10 

605@ 024632 100001 WORD 100001 

6057 024634 177777 WORD 17777? 

6058 

6059 024636 077777 . WORD 77777 sMUL TIPL ICAND 

6060 028640 000456 WORD 456 sMULTIPLIER 

6061 024642 000001 . WORD 1 

6062 024644 177322 » WORD 177322 

£062 024646 000226 ~ WORD ect 
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024050 
024652 
024654 
024656 
024660 


024662 
024664 

24666 
024670 
024672 


024674 
0246 76 
024 700 
024702 
024704 


024706 
024710 
024712 
624714 
024716 


024720 
024722 
024724 
024726 
024730 


024732 
024734 
024736 
024740 
024742 


024744 
024746 
024750 
024752 
024754 


024756 
024760 
024762 
024764 
024 766 


024770 
024772 
024774 
924776 
925000 


925002 


OS APR 84 


173210 


077777 
000000 


000000 
177777 
100000 


16:4 


li 30( 1046) 
5 
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eeecosesecoos DOUBI F 


73210 


oo Loo OOSpeo oo8scor 
uw 
- 


100000 
11 


0 
17777? 
100000 


iy 


113 
OPERAND TESTS eeeessescessesecs 


sMut TIPL TCAND 
sMULTIPLIER 


sMut TIPLICAND 
sMULTIPLIER 


sMUL TIPL TCANON 


sMULTIPLIER 


sMUL TIPLICAND 
sMULTIPLIER 


3MULTIPL ICAND 
sMULTIPLIER 


sMUL TIPL TCANC 
sMULTIPLTER 


sMUL TIPL ICAND 
sMULTIPLTIER 


sMULTIPL ICAND 
sMULTIPLIER 


sMuL TIPL ICAND 
sMULTIPL TIER 


sMut TIPL TCAND 


SEG OLi2 


IY 
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6120 025004 O77777 . WORD 77777 sMULTIPLIER 
6121 025006 O00011 . WORD 11 
6122 025010 100000 . WORD 100000 
—< 025012 140000 . WORD 140000 
612 
6125 025014 000001 . WORD sMULTIPL LCAND 
©6126 025016 177777 . WORD 177777 sMULTIPL IER 
6127 025020 000010 . WORD 10 
6128 025022 177777 .WORD 177777 
6129 025024 177777 . WORD 177777 
6130 025026 FIN125: 
©1131 3 
6132 025026 TE126: 
6133 3 TEST DIv (OIVIDE INST) 
6134 025026 005037 177776 CLR 89177776 sINIT PSw 
6135 025032 CLR R6 ;INIT SP 
6136 025034 013705 000000 MOV ao0,R5 sSAVE VECTORS 
6137 025040 013701 000002 MOV ae2,R1 F 
6138 025044 012737 000137 000000 MOV 137,800 ;SETUP NEW VECTORS 
6139 025052 012737 025074 000002 MOV @TE126A,ae2 3 
6140 025060 000277 scc sSET ALL CC BITS 
6141 025062 071627 000002 Olv 92,R6 3s TEST INSTRUCTION 
6142 025066 012706 001000 A126: MOV STBOT ,R6 sRESTORE SP BEFORE GOING TO ERROR 
6143 025072 104001 ERROR ol ;CPU ERROR 
6144 ;IF R7 ISN'T CORRECT GO TO ERROR 
6145 025074 022737 O00000 177776 TE126A: CMP 90,90177776 :IS PS CORRECT 
6146 025102 001403 BEQ 1$ :YES GO ON 
6147 025104 012706 001000 MOV eSTBOT ,R6 sRESTORE SP BEFORE GOING TO ERROR 
6148 025110 104001 ERROR +1 ;CPU ERROR 
6149 :NO GO TO ERROR 
6150 025112 012704 025066 1$: MOV 9A126,R4 3SETUP EXPECTED DATA 
6151 025116 006204 ASR R4 8 
6152 025120 020406 CMP R4 RE 31S R6& CORRECT 
6153 025122 001403 BEG es ;YES GO ON 
_ 6154 025124 012706 001000 MOV @STBOT ,R6 sRESTORE SP BEFORE GOING TO ERROR 
6155 025130 104001 ERROR +1 ;CPU ERROR 
6156 sNO GO TO ERROR 
6157 025132 010537 000000 2s: MOV RS,aeo0 sRESTORE VECTORS 
6158 025136 010137 000002 MOV R1,a%2 8 
6159 025142 012706 001000 MOV oSTBOT ,R6 sINIT SP 
6160 025146 012702 000006 MOV #6 ,R2 sINIT GPR 2 
6161 0625152 012703 000047 MOV 947,R3 sINIT GPR 3 
6162 025156 000277 scc ;SET ALL CC BITS 
6163 025160 071302 OIv R2,R3 3 TEST INSTRUCTION 
6164 025162 022737 000002 177776 CMP 02, a0177776 :IS PS CORRECT 
6165 025170 001401 BEQ 3% 3YES GO ON 
6166 025172 104001 ERROR +1 ;CPU ERROR 
6167 ;NO GO TO ERROR 
6168 025174 022702 000006 3$: CMP 06 ,R2 :IS R2 CORREC! 
6169 025200 001401 BEQ 4$ sYES GO ON 
6170 025202 104001 ERROR ol ;CPU ERROR 
6171 . :NO GO TO ERROR 
6172 025204 022703 000047 4s: CMP 047,R3 3IS R3 CORRECT 
61/3 025210 001401 BEQ S$ 3YES GO ON 
6174 025212 104001 ERROR +1 ;CPU ERROR 


;NO GO TO ERROR 
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6176 
©177 
6178 
6179 


025240 


025242 
025246 
025250 


025314 
025316 


025332 
025336 
025340 


025342 
025346 
025350 


025352 
025356 


025374 
025376 


025400 
025404 
025406 


025410 
025414 
025416 


05 -APR 84 16:45 


005004 
012705 
000277 
071427 
022737 
001401 
104001 


022704 
001401 
104001 


022705 
001401 
104001 


012700 
012705 
005004 
000277 
071400 
022737 
001405 
010067 
104001 


016700 
022700 
001401 
104001 


022704 
001401 
104001 


022705 
001401 
104001 


012705 


022705 
001401 
104001 


000004 
000000 


a 
‘ 


000002 


000002 


177776 


177776 


177776 


05 - APR - 84 


KY 


16:45 PAGE 115 


eeeeeeeeee06 DOUBLE OPERAND TESTS eeseseseseseareees 


S$: 


o$: 


7$: 


9$: 


10$: 


11$; 


12$: 


13$: 


14%; 


R4 
#4,R5 


#0 ,R4 
#7 ,80177776 
6 


RO,R4 
00 ,80177776 
9$ 


RO,400 
+1 


400 ,RO 
04,RO 
10$ 
+1 


#2,R4 
11$ 
+1 


#0,R5 
les 
+1 


#10,R5 
R4 


@3,R4 
0,80177776 
13$ 

1 


#2,R4 
14$ 
+1 


02,R5 
15$ 
el 


sINIT R4 

sINIT RS 

3SET ALL CC BITS 

; TEST INSTRUCTION 
:IS PS CORRECT 


31S R4&4 CORRECT 
;YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 
31S RS CORRECT 
;YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 
;INIT RO 
sINIT R5 
sINIT R4 
;SET ALL CC BITS 
; TEST INSTRUCTION 
3IS PS CORRECT 


;CPU ERROR 

;NO GO TO ERROR 
sRESTORE RO 
:IS RO CORRECT 
;YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 
3IS R4& CORRECT 
;YES GO ON 

;CPU ERROR 

sNO GO TO ERROR 

:IS RS CORRECT 

S GO ON 


;NO GO TO ERROR 
sINIT RS 
;INIT R4 
;SET ALL CC BITS 
; TEST INSTRUCTION 
3IS PS CORRECT 
;YES GO ON 

;CPU ERROR 


;CPU ERROR 
:NO GO TO ERROR 
:IS RS CORRECT 
;YES GO ON 
;CPU ERROR 
3;NO GO TO ERROR 


COKDABO a 8 ee MACY11 30( 1046) 
COKDAB.” 11 05 - APR 


025502 
025506 
025510 


025512 
025516 
025522 
025524 


025526 
025532 
025536 
025542 


025544 


025550 
025552 
025554 
025556 
025560 
025562 


025564 
025566 
025570 
025572 
025574 
025576 


025600 


-84 16:45 


012701 


010137 
011104 
016103 


016105 
000277 
071461 
026137 
001401 
104001 


026105 
001401 
104001 


026104 
001401 
104001 


023701 
001403 
104001 


013701 
026103 
001403 
104001 


010361 
062701 
021127 
001330 


000167 


177777 
177777 
177777 


177777 


025550 
110502 
000004 
000002 


000004 
000006 
000010 
000012 
110502 
110502 
000004 
000004 
000014 
000333 


000316 


177776 


O05 - APR - 84 


LY 


16:45 PAGE 


116 
eeeeeeeee00ee DOUBLE OPERAND TESTS seeeneaseasesaseas 


a 
H 
158: 
16$: 


17$: 
18$: 


198: 


208: 


21%: 


TE126B: 


#TE126B,R1 sSETUP POINTERS TO TABLES 
R1,@0EXPDAT ;SAVE A COPY OF R1 
(R1),R4 ;INIT R4 
4(R1),R3 sSAVE SOURCE 
2(R1),R5 sINIT RS 
3SET ALL CC BITS 

4(R1),R4 s TEST INSTRUCTION 
6(R1),80177776 31S PS CORRECT 
17$ :YES GO ON 
ol ;CPU ERROR 

:NO GO TO ERROR 
10(R1),R5 31S RS CORRECT 
18$ :YES GO ON 
+1 ;CPU ERROR 

:NO GO TO ERROR 
12(R1),R4 ;IS R4& CORRECT 
19$ sYES GO ON 
ol ;CPU ERROR 

;NO GO TO ERROR 
QVEXPDAT,R1 :IS R1 CORRECT 
20$ ;YES GO ON 
+1 ;CPU ERROR 

sNO GO TO ERROR 
QHEXPDAT,R1 sRESTORE CORRECT VALUE 
4(R1),R35 :IS SOURCE CORRECT 
21$ ;YES GO ON 
+1 ;CPU ERROR 

:NO GO TO ERROR 
R3,4(R1) ;TRY TO RESTORE CODE 
#14,R1 sPOINT TO NEXT LOCATION 
(R11), #333 ;ARE WE DONE 
16$ sNO GO TO 16$ 
FIN126 
177777 ;OIVIDEND 
177777 =;INIT RS 
177777 ;OIVISOR 
1?) 3PSwW 
r@) 3R5S RESULT 
1 3R4 RESULT 
r¢) ;D0IVIDEND 
177777 =;INIT RS 
177777 ;OIVISOR 
12 3;PSW 
177777 ;R5 RESULT 
1?) 3;R4 RESULT 
177777 ;O0IVIDEND 


SEQ 0115 


M9 


COKDABO K0J11-B CLUSTER voy! 30( 1046) O5-APR-84 16:45 PAGE 
05 -APR -84 16:45 


COKDAB 


-PLl 


025722 


025724 
025726 
025730 
025732 
025734 
025736 


025740 


117 
ae¢ee00000000 DOUBLE OPERAND TESTS eeeseseseeseseses 


000000 -WORD O sINIT RS 
177777 «WORD 177777 ;OIVISOR 
000002 -WORD 2 3PSW 
000000 -WORD O sRS RESULT 
177777 «WORD 177777 ;R4 RESULT 
000000 -WORD O sDIVIDEND 
007642 -WORD 7642 sINIT RS 
007643 -WORD 7643 sOIVISOR 
000004 -WORD 4 3PSW 
007642 -WORD 7642 :R5 RESULT 
000000 -WORD O 3R4 RESULT 
000000 -WORD O sDIVIDEND 
000137 -WORD 137 sINIT RS 
177543 «WORD 177543 ;DIVISOR 
000004 -WORDB 4 3PSwW 
000137 -WORD 137 7R5 RESULT 
000000 -WORD O 3R4 RESULT 
000000 -WORD O sOIVIDEND 
007643 . -WORD 7643 ;INIT RS 
007643 -WORD 7643 s;DIVISOR 
000000 -WORD O 3PSW 
000000 -WORD O 3RS RESULT 
000001 -WORD 1 3R4 RESULT 
100000 -WORD 100000 ;DIVIDEND 
004376 -WORD 4376 sINIT RS 
010021 -WORD 10021 ;OIVISOR 
000012 -WORD 12 :PSW 
004376 -WORD 4376 :RS RESULT 
100000 -WORD 100000 ;R4 RESULT 
177700 -WORD 177700 ;DIVIDEND 
170033 -WORD 170033 ;INIT RS 
010021 -WORD 10021 ;DIVISOR 
000010 -WORD 10 3PSW 
171307 -WORD 171307 ;RS RESULT 
176024 -WORD 176024 ;R4 RESULT 
177700 -WORD 177700 ;DIVIDEND 
170033 -WORD 170033 ;INIT RS 
167757 -WORD 167757 ;DIVISOR 
000000 -WORD O 3PSW 
171307 -WORD 171307 :R5 RESULT 
001754 -WORD 1754 3R4 RESULT 
000000 -WORDB O sOIVIDEND 
177777 -WORD 177777 ;INIT RS 
000001 -WORD 1 sOIVISOR 
000002 -WORD 2 3PSW 
177777 -WORD 177777 ;R5 RESULT 
000000 -WORD 0O 3R4 RESULT 


177777 . WORD 177777 =;O0IVIDEND 


SEQ 0116 


COKDABO KDJ11-6 CLUSTER MACY11 30(1046) O5-APR-84 16:45 PAGE 118 
COKDAB .P11 05-APR-84 16:45 0600000000 DOUBLE OPERAND TESTS eeesesesacecacens SEQ 9117 


6344 025742 045716 -WORD 45716 sINIT RS 
6345 025744 000001 -WORD 1 sOIVISOR 
6346 025746 000012 «WORD 12 3PSW 

6347 025750 045716 -WORD 45716 #RS RESULT 


tos 025752 177777 «WORD 177777 ;R4& RESULT 
6 

©350 025754 000000 -WORD O sOIVIDEND 
6351 025756 000002 -WORD 2 sINIT RS 
6352 025760 17/7770 -WORD 177770 ;DIVISOR 
6353 025762 000004 -WORD 4 ;PSW 

6354 025764 000002 -WORD 2 iR5 RESULT 
ooee 025766 000000 -WORD O 3R4 RESULT 
6 

6357 025770 177777 -WORD 177777 ;DIVIDEND 
6358 025772 177776 -WORD 177776 ;INIT RS 
6359 025/774 000010 10 sDIVISOR 
6360 025776 000004 -WORDB 4 3PSwW 

6361 026000 177776 -WORD 177776 ;RS RESULT 
tt 026002 000000 WORD O :R4 RESULT 
6364 026004 1 -WORD 1 sOIVIO=ND 
6365 026006 177777 -WORD 177777 ; INIT RS 
6366 026010 000001 -WORD 1 sOIVISOR 
6367 026012 -WORD 2 ;PSW 

6368 026014 177777 -WORD 177777 ;RS RESULT 
ooee 026016 000001 -WORD 1 3R4 RESULT 
6371 026020 000001 -WORD 1 ;O0IVIDEND 
6372 026022 -WORDB O ;INIT RS 
6373 026024 000002 -WORDB 2 sOIVISOR 
6374 026026 000002 -WORD 2 3PSwW 

6375 026030 000000 -WORD O :RS RESULT 
fe 026032 000001 -WORD 1 3R4 RESULT 
6378 026034 000001 -WORD 1 ;OIVIDEND 
6379 026036 -WORD O sINIT RS 
6380 026040 000003 -WORD 3 sOIVISOR 
6381 026042 000000 -WORD O 3PSwW 

6382 026044 000001 -WORD 1 3RS RESULT 
oaas 026046 052525 -WORD S2525 :R4 RESULT 
6385 026050 000023 -WORD 23 sOIVIDEND 
6386 026052 016054 -WORD 16054 sINIT RS 
6387 026054 016537 -WORD 16537 sOIVISOR 
6388 026056 -WORD O 3PSw 

6389 026060 010222 -WORD 10222 3RS RESULT 
ny 026062 000246 -WORD 246 sR4 RESULT 
6392 026064 000333 -WORD 5353 

6393 026066 FIN126: 

6394 ; 

6395 026066 TEle2?: 

6396 F TEST ASH CARITHMETIC SHIFT) 
6397 026066 005037 177776 CLR Q0177776 : INIT PSwW 
6398 026072 012702 000001 MOV #1,R2 ;SETUP OPERAND 


6399 026076 000277 scc sSET ALL CC BITS 


COKDABO KNIJ11 B CLUSTER MACY11 30( 1046) 
05 -APR-84 16:45 


COKDAB P11 


6400 026100 
6401 026102 
6402 026110 
6403 026112 


©6405 026114 
6406 026120 
6407 026122 


©409 026124 


54 026262 


072202 
022737 
001401 
104001 


020227 
001401 
104001 


012702 
012703 


020327 
001401 
104001 


029227 
001401 
104001 


012701 


010103 
016102 
000277 
072211 
026137 
001401 
104001 


02€102 
001401 
104001 


020301 
001402 
104001 


010301 
021311 
001401 
104001 


062701 
020127 
001346 


00016” 


000007 


000002 


000004 


000010 
026526 


000240 


177776 


177776 


05 - APR -84 
eeeeeeeeeese DOUBLE OPERAND TESTS seecesceesccscese 


1$; 


es: 


3$; 


4$: 


538; 
68: 


7$: 


9%: 


10%; 


B10 


16:45 PAGE 119 
ASH R2,R2 
CMP 00,80177776 
BEQ 1$ 
ERROR ol 
cmMP R2,02 
BEQ os 
ERROR ol 
MOV #100000 ,R2 
MOV O1,R5 
ccc 
ASH R3,R2 
cMP 07,80177776 
BEQ 3$ 
ERROR ol 
cmp R3,°1 
BEQ 43 
ERROR ol 
cmp R2, 20 
BEQ 58 
ERROR ol 
MOV @TEL27A,R1 
MOV R1,R3 
MOV 2(R1),R2 
scc 
ASH (R1),R2 
CMP 4(R1),80177776 
BEQ 7$ 
ERROR ol 
cmp 6(R1),R2 
BEG 8$ 
ERROR ol 
CMP R3,R1 
BEQ 93 
ERROR 1 
MOV R3,R1 
CMP (R3),(R1) 
BEQ 10$ 
ERROR of 
ADD #10,R1 
CMP RL, OF INL? 
BNE 6% 
JMP FIN1L2? 


s TEST INSTRUCTION 
sIS PS CORRECT 
sYES GO ON 

sCPU ERROR 

sNO GO TO ERROR 
3IS R2 CORRECT 
sYES GO ON 

sCPU ERROR 

3NO GO TO ERROR 
sSETUP R2 
sSETUP R35 
sCLEAR ALL CC BITS 
s TEST INSTRUCTION 
3IS PS CORRECT 
sYES GO ON 

:CPU ERROR 

3NO GO TO ERROR 
3IS R3 CORRECT 
sYES GO ON 

3CPU ERROR 

3NO GO TO ERROR 
3IS R2 CORRECT 
YES GO ON 

;CPuU ERROR 

3NO GO TO ERROR 


sSETUP POINTERS TO TABLES 


3 
sSETUP RO 
sSET ALL CC BITS 
3s TEST INSTRUCTION 
sIS PS CORRECT 
3YES GO ON 
;CPU ERROR 
s;NO GO TO ERROR 
3IS R2 CORRECT 
sYES GO ON 
:CPU ERROR 
3NO GO TO ERROR 
3IS Ri CORRECT 
sYES GO ON 
sCPU ERROR 
sNO GO TO ERROR 
sRESTORE Ri 
31S SOURCE CORREC’ 
sYES GO ON 
3sCPU ERROR 
sNO GO TO ERROR 
sSOURCE LOOKS INCORREC’ 
s INCREMENT POINTER 
sARE WE DONE 
3sNO GO TO o$ 


SEQ 91184 


COKDABO KDI11 B 
COKDAB P11 0 


026266 
026270 
026272 
0262? 


0262 76 
026300 
026302 
026304 


026306 
026310 
026312 
026314 


026316 
026320 
026322 
026324 


026326 


026412 
026414 


C10 


CLUSTER MACY11 3011046) O5 APR-84 16:4 p 
S-APR 84 16:45 oeeeeececes SéceL t OBE RAND TESTS eeececccesscccoes 
177761 fe127A: .wORD 177761 s SOURCE 
077777 .WORD 77777 sDEST 
000005 . WORD 5 

000000 . WORD 0 

177700 . WORD 177700 s SOURCE 
017777 . WORD 17777 ;DEST 

. WORD 0 

017777 .WORD 17777 

177700 . WORD 177700 3 SOURCE 
100000 . WORD 100000 3;DEST 
000010 . WORD 10 

100000 . WORD 100000 

aevire .WORD 177777 3 SOURCE 
100000 .WORD 100000 3s0EST 
000010 . WORD 10 

140000 . WORD 140000 

177737 . WORD 177737 3 SOURCE 
177777 . WORD 177777 3DEST 
000011 . WORD 11 

177777 . WORD 177777 

177706 ~WORD 177706 3 SOURCE 
102000 . WORD 102000 sDEST 
000007 . WORD 7 

000000 . WORD 0 

177710 . WORD 177710 3 SOURCE 
017777 .~ WORD 17777 3DEST 
000013 . WORD 13 

177400 ~WORD 177400 

177713 . WORD 177713 3 SOURCE 
000012 . WORD le 3DEST 
000000 . WORD 0 

050000 . WORD 50000 

177707 ~WORD 177707 3 SOURCE 
170001 . WORD 170001 ;0EST 
000002 . WORD 2 

000200 ;WORD 200 

177717 ~ WORD 177717 3 SOURCE 
000001 .WORD 1 3DEST 
000012 ~ WORD 12 

100000 . WORD 100000 

177740 ~ WORD 177740 3 SOURCE 
017777 ~ WORD 17777 3DEST 
000004 ~ WORD 4 


000000 -WORD O 


SEG 0119 


COKDABO KDJL1 8B CLUSTER macy 4 t 50( 1046) 
COKDAB.P 11 OS -APR -84 16:45 


e512 
©5138 
6514 
6515 
6516 


026516 
026520 
026522 
026524 


026526 
026530 


026530 
026534 
026540 
026544 
026546 
026550 
026552 


177771 


177742 
100000 
000011 
177777 


000010 


000011 
177777 


177770 


073401 
023727 


177776 
000025 
052525 


177776 000012 


OS APR 84 
eoenrecccoes 


FINI27: 


3 
TE130: 
’ 


TEST AS 
LR 


D10 


177771 
150000 
10 

177640 


177742 
100000 


11 
177777 


177764 
100000 


10 
177770 


177750 
raed 


te) 


177760 
100000 


11 
177777 


177770 
100000 
10 

177600 


177712 
4367 


177701 
ae 
20000 


@0177776 
$23,R1 
52525,R5 
R4 


R1,R4 
QO1L77776,al1e 


s SOURCE 
3;DEST 


3 SOURCE 
;DEST 


3 DO URCE 
3sDEST 


3 SOURCE 
sDiEST 


3 SOURCE 
sDEST 


3 SOURCE 
sDEST 


3s SOURCE 
3;DEST 


3 SOURCE 
3sDEST 


3 SOURCE 
3DEST 


B60. OBERANG TESTS seeessesesscesees 


MC CARITHMETIC SHIFT COMBINED) 


: INIT PSw 

,5ETUP R1 

s;SETUP RS 

;SETUP R4 

sSET ALt CC BITS 

3 TEST INSTRUCTION 
31S PS CORRECT 


SEG 9120 


COKDABO KDJ11 B CLUSTER a 30( 1046) 


COKDAB.P 11 


6568 
6569 
6570 
6571 
6572 
057 


026560 
026562 


026742 
026746 
026750 


05 - “APR - 84 


001401 
104001 


020127 
001401 
104001 


020427 
001401 
104001 


020527 
001401 
104001 


012703 
o0S0Nn2 
012/04 
000277 
078827 
0235727 
001401 
104001 


020227 
001401 
104001 


020327 
001401 
104001 


020427 
001401 
104001 


012701 


026102 
001401 
104001 


026103 
001401 
104001 


16 


027006 


000002 


000004 


177776 


000010 


000012 


Anas 


05 APR -84 


E10 


122 
eoeeeeeeeees DOUBLE OPERAND TESTS seeeeneseeeeesess 


1$; 


es: 


3$: 


4s: 


5$: 


63: 


7$: 


8$: 
9$: 


10$: 


11%: 


16;45 son 
BEQ 1$ 
ERROR ol 
cmp R1,@23 
BEQ es 
ERROR ol 
CMP R4, #125250 
BEG 3$ 
ERROR ol 
cmp R5,00 
BEQ 4$ 
ERROR ol 
MOV o3ese5. Rz 
Ci. R 
MOV sisetM. ha 
scc 
ASHC 023,R3 
CMP @0177776,41le2 
BEG 5s 
ERROR ol 
CMP R2,00 
BEQ 6$ 
ERROR el 
CMP R3,00 
BEQ 7$ 
FRROR ol 
CMP R4, 0164731 
BEQ 8$ 
ERROR ol 
MOV @TEL3ZOA,R1 
MOV R1,R4 
MOV 2(R1),R2 
MOV 4(R1),R3 
scc 
ASHC CR1),R2 
CMP a177776,6(R1) 
BEQ 10$ 
ERROR ol 
CMP 10(R1),R2 
BEG 11% 
ERROR ol 
CMP 12: R1),R3 
BEG 12$ 
ERROR +1 


YES GO ON 
3CPU ERROR 
sNO GO TO ERROR 
:IS R1 CORRECT 
sYES GO ON 
;CPU ERROR 
3NO GO TO ERROR 
31S R4& CORRECT 
:YES GO ON 
;CPU ERROR 
sNO GO TO ERROR 
31S RS CORRECT 
sYES GO ON 
;CPU ERROR 
sNO GO TO ERROR 
sSETUP R3 
;SETUP R2 
;SETUP R4 
sSET ALL CC BITS 
3 TEST INSTRUCTION 
3IS PS CORRECT 
sYES GO ON 
;CPU ERROR 
sNO GO TO ERROR 
:IS R2 CORRECT 
3YES GO ON 
;CPU ERROR 
:NO GO TO ERROR 
;IS R3 CORRECT 
YES GO ON 
;CPU ERROR 
sNO GO TO ERROR 
:IS R4& CORRECT 
3YES GO ON 
3CPU ERROR 
sNO GO TO ERROR 
3 


a 
sSETUP POINTERS TO TABLES 
e° +! A = OF R1 


F as 
3% ALL CC BITS 
: TEST INSTRUCTION 
3IS PS CORRECT 
:YES GO ON 
;CPU ERROR 
s;NO GO TO ERROR 
31S R2 CORRECT 
3YES GO ON 
;CPU ERROR 
3NO GO TO ERROR 
31S R3 CORRECT 
YES GO ON 
;CPU ERROR 


SEQ O12i 


COKDABO KDJ11 B CLUSTER MACY11 30( 1046) 


COKDAB.P 11 


026752 
026754 
026756 


026760 
026762 
026 764 
026 766 


026770 
026774 
027000 


027002 


027006 
027010 
027012 
027014 
027016 
027020 


027022 
027024 
027026 
027030 
027032 
027034 


027036 
027040 
027042 
027044 
027046 
027050 


027052 
027054 
027056 
027060 
027062 
027064 


027066 
027070 
027072 
027074 
027076 
027100 


027102 
027104 


05 


020401 
001402 
104001 


010401 
021114 
001401 
104001 


062701 
020127 
001340 


000167 


177700 
100125 
177777 
000010 
100125 
177777 


177777 
000001 
000000 
000000 
000000 
100000 


177701 
047777 


065700 


177737 
00C000 


-APR-84 16:45 


000014 
027416 


000410 


05 -APR -84 


12$: 


13$: 


14$: 


; 
H 
TEL30A: 


16:45 PAGE 
eeeeceeeeeee DOUBLE ene TESTS seeeeeeseeesesees 


R4,R1 
13$ 
+1 


R4,R1 
CR1),CR4) 
14$ 

+1 


#14,R1 
R1, OF IN130 
9$ 


FIN130 


100125 
177777 


177777 
1 
0 
1?) 
.¢) 
109000 
177701 


47777 
100000 


65700 


177737 
1) 


£10 


sNO GO TO ERROR 


s3IS R1 CORRECT 
GO ON 


sYES 
;CPU ERROR 


sNO GO TO ERROR 


sIS SOURCE CORRECT 
GO ON 


3YES 
;CPU ERROR 


;NO GO TO ERROR 


sPOSSIBLE SOURCE CCDE CORRUPTION 
3;GO TO NEXT TEST 

sARE WE CONE 

sNO GO TO 9$ 


3 SOURCE 
;DESTINAT ION 
3;DESTINATION 
;TEST PSw 
sRESULT WORD 
sRESULT WORD 


3 SOURCE 
;DESTINATION 
;DESTINATION 
;TEST PSwW 
;RESULT WORD 
sRESULT WORD 


3 SOURCE 
sDESTINATION 
sDESTINATION 
sTEST PSw 
sRESULT WORD 
sRESULT WORD 


3; SOURCE 
;DESTINATION 
;DESTINATION 
3; TEST PSW 
sRESULT WORD 
sRESULT WORD 


3 SOURCE 
sDESTINATION 
sDESTINATION 
3TES” PSW 
sRESULT WORD 
sRESULT WORD 


3 SOURCE 
;DESTINATION 


SEQ Ol22 


GLO 


COKDABO KDI11 B CLUSTER MACY11 30(1046) 05 APR 84 16:45 PAGE 124 

COKDAB.P 11 05 -ArR 84 16:45 eeeeeeeeeeee DOUBLE OPERAND TESTS seeccscccccecceos SEQ 0123 
6080 027106 000001 . WORD 1 sDESTINATION WORD 2 
©681 027110 000004 .WORDB 4 sTEST PSw 
6682 027112 000000 -WORD O sRESULT WORD 1 
ees 027114 000000 -WORD 0 sRESULT WORD 2 
66 
©685 027116 177736 . WORD 177736 3 SOURCE 
©6686 027120 000000 .WORD O sDESTINATION WORD 1 
6687 027122 000001 . WORD 1 sDESTINATION WORD 2 
6688 027124 000000 -WORDB O sTEST PSw 
6689 027126 040000 .WORD 40000 sRESULT WORD 1 
a 027130 000000 -WORD O sRESULT WORD 2 
6091 
6692 027132 177740 .WORD 177740 3s SOURCE 
6693 027134 100000 . WORD 100000 sDESTINATION WORD 1 
6694 027136 000000 -WORD O sDESTINATION WORD 2 
6695 027140 000011 . WORD 11 sTEST PSw 
66% 027142 i77777 . WORD 177777 sRESULT WORD 1 
6697 027144 177777 .WORD 177777 sRESULT WORD 2 
6698 
6699 027146 177725 . WORD 177725 : SOURCE 
6700 027150 177777 . WORD 177777 ;DESTINATION WORD 1 
6701 027152 174000 . WORD 174000 sDESTINATION WORD 2 
6702 027154 000007 . WORD 7 ;TEST PSw 
6703 027156 000000 .WORD O sRESULT WORD 1 
tans 027160 000000 .WORD O sRESULT WORD 2 
6706 027162 177724 . WORD 177724 3 SOURCE 
6707 027164 177777 . WORD 177777 ;DESTINATION WORD 1 
6708 027166 174000 . WORD 174000 sDESTINATION WORD 2 
6709 027170 OO00011 . WORD 11 3;TEST PSw 
6710 027172 100000 . WORD 100000 sRESULT WORD 1 
oath 027174 000000 -WORD O sRESULT WORD 2 
6713 027176 177733 . WORD 177733 3; SOURCE 
6714 027200 177777 . WORD 177777 sDESTINATION WORD 1 
6715 027202 157023 . WORD 157023 sDESTINATION WORD 2 
6716 027204 000012 . WORD 12 sTEST PSw 
6717 027206 114000 . WORD 114000 sRESULT WORD 1 
He 027210 000000 -WORD O sRESULT WORD 2 
6720 027212 177727 . WORD 177727 3s SOURCE 
6721 027214 000000 -WORDB O sDESTINATION WORD 1 
6722 027216 177777 . WORD 177777 sDESTINATION WORD 2 
6723 027220 000013 . WORD 13 sTEST PSw 
6724 027222 177600 . WORD 177600 sRESULT WORD 1 
eeet 027224 000000 . WORD 9) sRESULT WORD 2 
6727 027226 177717 . WORD 177717 3 SOURCE 
6728 027230 177777 . WORD 177777 sDESTINATION WORD 1 
6729 027232 000001 . WORD 1 ;DESTINATION WORD 2 
6730 027234 000011 . WORD 11 :TES’ PSw 
6731 027236 100000 . WORD 100000 sRESULT WORD 1 
th 027240 100000 . WORD 100600 sRESULT WORD 2 
6734 027242 177741 -WORD 177741 s SOURCE 


6725 027244 100000 . WORD 100000 sDESTINATION WORD 1 
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6736 027246 000000 . WORD 0 sDESTINATION WORD 2 
©7387 027250 000010 . WORD 10 s TEST PSwW 
6738 027252 177777 . WORD 177777 sRESULT WORD 1 
the 027254 177777 . WORD 177777 sRESULT WORD 2 
6? 
© 741 027256 177742 . WORD 177742 3: SOURCE 
©742 027260 037777 . WORD 37777 sOESTINATION WORD 1 
6743 027 177777 . WORD 177777 sDESTINATION WORD 2 
©6744 027264 000005 . WORD 5 sTEST PSw 
6745) 027266 000000 .- WORD 0 sRESULT WORD 1 
pes -027270 000000 . WORD 0 sRESULT WORD 2 
6/747 
6748 O27272 177742 . WORD 177742 3: SOURCE 
6749 027274 O77777 . WORD 77777 sDESTINATION WORD 1 
67 027276 177777 . WORD 177777 sDESTINATION WORD 2 
6751 027300 000001 . WORD 1 ;TEST PSw 
67 027302 000000 . WORD te) sRESULT WORD 1 
Ht 027304 000001 WORD 1 sRESULT WORD 2 
6? 
6755 027306 177711 . WORD 177711 3: SOURCE 
6756 027310 065600 . WORD 65600 sDESTINATION WORD 1 
6757 027312 000012 . WORD 12 sDESTINATION WORD 2 
6758 027314 000003 . WORD 3 sTEST PSw 
6759 027316 000000 . WORD 1?) sRESULT WORD 1 
Br 027320 012000 . WORD 12000 sRESULT WORD 2 
6762 027322 177740 . WORD 177740 3 SOURCE 
6763 027324 077777 . WORD 77777 sDESTINATION WORD 1 
6764 027326 177777 .WORD 177777 sDESTINATION WORD 2 
6765 027330 000004 . WORD 4 sTEST PSwW 
6766 027332 000000 . WORD t¢) sRESULT WORD i 
td 027334 000000 .» WORD 0 sRESULT WORD 2 
6769 027336 177737 . WORD 177737 3; SOURCE 
6770 027340 177777 .~ WORD 177777 sDESTINATION WORD 1 

77i 027342 {477774 . WORD 177774 sDESTINATION WORD 2 
6772 027344 000011 . WORD 11 3TEST PSw 
6773 027346 177777 . WORD 177777 sRESULT WORD 1 
they 027350 177777 -WORD 177777 sRESULT WORD 2 
6776 027352 177747 .WORD 177747 3 SOURCE 
6777 027354 100000 . WORD 100000 sDESTINATION WORD 1 
6778 027356 174000 . WORD 174000 sDESTINATION WORD 2 
6779 027360 000010 . WORD 10 sTEST PSw 
6780 027362 177777 . WORD 177777 sRESULT WORD 1 
the 027364 177700 . WORD 177700 sRESULT WORD 2 
6783 027366 177753 . WORD 177753 3 SOURCE 
6784 027370 006324 .- WORD 6324 sDESTINATION WORD 1 
6785 027372 071002 . WORD 71002 sDESTINATION WORD 2 
6786 027374 000001 . WORD 1 3;TES’ PSw 
6787? 027376 000000 . WORD ce) sRESULT WORD 1 
the 027400 000146 . WORD 146 sRESULT WORD 2 
ag 

6790 027402 177765 . WORD 177765 3 SOURCE 
6791 027404 102351 . WORD 102351 DE STINATION WORD 1 


SEG 0124 
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027406 
027410 
027412 
027414 
027416 
027416 


027416 
2 7420 
027424 
027430 


027432 
027434 
027436 
027442 
027446 
027452 
027454 


027456 
027462 
027466 
027472 
027474 


027476 
027502 
027506 
027512 
027516 
027520 


027522 
027524 
027526 
027532 
027534 
027536 
027542 
027544 
027550 
027552 


027554 
027560 
027560 
027564 
027570 
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153434 
000002 


153416 
153412 
000004 


001000 
153372 
0007 76 


001000 
153352 
153346 
000774 


000002 


001000 
000776 


001000 


150202 
000150 


150210 


153164 
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. WORD 177231 sDESTINATION WORD 2 
. WORD 11 ; TEST PSw 
. WORD 177760 sRESULT WORD 1 
. WORD 116477 sRESULT WORD 2 
FIN1 50; 
MSPAU:;: 
3 TEST THAT AUTO DEC/INC OPERATIONS USING SP ARE ON WORD BOUNDRIS 
CLR Ro ;CLEAR SP 
MOVB (R6)+, COUNT sTRY AUTOINC ON R6 
CMP #2,R6 ;VERIFY AUTO INC Br 2 
BEQ SPAU1 ;BRANCH IF GOOD 
3;BAD AUTO-INC 
ERROR +l 3CPU ERROR 
SPAUL: CLR R6 ;CLEAR R6 
MOVB (R6)+ COUNT 
MOvVB (R6)+, COUNT ;D0UBLE BYTE AUTO-INC 
CMP 04 ,R6 ;VERIFY RESULT 
BEQ SPAV2 sBRANCH IF GOOD 
ERROR ol ;CPU ERROR 
3BAD DOUBLE AUTO-INC 
SPAU2: MOV @STBOT .R6 sLOAD R6 
MOVB -(R6), COUNT 3; TEST AUTO-DEC 
CMP #776 ,R6 ;VERIFY RESULT 
BEQ SPAUS ;BRANCH IF GOOD 
ERROR o1 ;CPU ERROR 
SPAU3: MOV @STBOT,R6 sLOAD R6 
MOvVB -(R6), COUNT 3; TEST AUTO-DEC 
MOvB -(R6), COUNT 3; TEST AUTO-DEC 
CMP @774,R6 sVERIFY RESULT 
BEQ SPAU4 ;BRANCH IF GOOD 
ERROR +l ;CPuU ERROR 
SPAU4: CLR R6 ; TEST AUTO-INC ON SOP 
TSTB (R6)> 3 TEST AUTO-INC 
CMP R6,%2 
REQ SPAUS ;BRANCH IF GOOD 
ERROR ol 3;CPU ERROR 
SPAUS: MOV #STBOT ,R6 ;LOAD R6 
TST8 -(R6) 3; TEST AUTO-DEC 
cmp ¢776,R6 sVERIFY RESULT 
BEQ SPAU6 ;BRANCH IF GOOD 
ERROR 1 3;CPuU ERROR 
SPAU6: MOV #STBOT ,R6 
Fy 
MTR 
3 VERIFY YELLOW ZONE TRAP ON AUTO DEC OF RE 
CLR CPEREG sINIT CPU ERROR REGISTER 
MOV #150 ,R6 3;LOAD R6 WITH A VALUE THAT WILi 


sCAUSE A YELLOW STACK TRAP CTE, 


MOV 4,51 OCOO sSAVE VECTOR 


SEQ O125 
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027576 
027604 
027610 
027614 
027620 
027624 
027626 
0276382 


Oe 7634 
027634 
027642 
027644 
027650 
027652 


027654 
027654 
027660 
027666 
027672 
027676 
027702 


027706 


027706 
027712 
027716 
027724 
027732 
027736 
027740 
027744 


027746 
027746 
027752 
027756 
027762 
027770 
027772 
027776 


030024 
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012767 
016701 
016702 
016703 
005067 
005046 
012706 
104001 


022 767 
001003 
020627 
001401 
104001 


00506 7 
016767 
01016? 
010267 
010367 
012706 
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027634 
150336 
150330 
150322 
150322 


001000 


147762 
000150 
030026 


001000 


150200 


150124 


150116 


153036 
150052 


150014 


147766 


JLO 


16:45 PAGE 12 
eecesssoeoess DOUBLE OPERAND TESTS seeeeseeeeecesees 
MOV OMTRYA,4 sSETUP THE STACK OVERFLOW TRAP POINTER 
MOV ‘ 146,R1 ;SAVE VECTOR 
4 MOV 144,R2 sSAVE VECTOR 
MOV 142,R3 sSAVE VECTOR 
CLR 146 3JUST AS A PRECAUTION 
CLR -(R6) ;CAUSE A STACK OVERFLOW TRAP 
MOV @STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
ERROR ol sCPU ERROR 
— sOVERFLOW TRAP FAILED 
TA: 
CMP #BITO3,CPEREG sWAS CPU ERROR REG SET PROPERLY? 
BNE 1$ 3GO TO ERROR IF NOT 
CMP R6,0142 sVERIFY CORRECT DECRIMENT OF R6E 
BEQ MTRYB sBRANCH IF GOOD 
18; ERROR +l ;CPU ERROR 
3R6& IMPROPERLY DECRIMENTED 
ntave ;OR CPU ERROR REGISTER NOT CORRECT 
YS: 
CLR CPEREG sCLEAR THE CPU ERROR REGISTER 
MOV SLOCOO,4 sRESTORE VECTOR 
MOV Ri,146 sRESTORE VECTORS 
MOV R2,144 H ai 
MOV R3,142 Fy 
MOV @sTBor, R6 
Hy 
MTRYM: 
5 ng STACK OVERFLOW TRAPS IN VARIOUS MODES 
CLR CPEREG ;CLEAR CPU ERROR REGISTER 
MOV 400 ,R6 s;SETUP OVERFLOW R6 DATA 
MOV 4,SLOCOO sSAVE VECTOR 
MOV @TRYMA,4 
CLR 376 ;JUST AS A PRECAUTION 
CLR -(R6) sCAUSE OVERFLOW TRAP 
MOV #STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
ERROR ol ;CPU ERROR 
3NO OVERFLOW TRAP 
TRYMA: 
CLR CPEREG ;CLEAR CPU ERROR REGISTER 
MOV #1000,R5 ;SETUP RS DATA 
MOV #400 ,R6 ;SETUP OVERFLOW R6 DATA 
MOV @TRYMB,4 
ADD -C(R6), -CR5) sCAUSE OVERFLOW TRAP 
MOV #STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
ERROR el ;CPU ERROR 
s:NO OVERFLOW TRAP 
TRYMB: 
CLR CPEREG ;CLEAR CPU ERROR REGISTER 
MOV #150,R6 ;SETUP OVERFLOW R6 DATA 
MOV @TRYMC 4 
BIC -(R5), -CR6) sCAUSE OVERFLOW TRAP 
MOV #STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
ERROR +1 ;CPU ERROR 


3NO OVERFLOW TRAP 


SEG 0126 


K10 
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COKDAB .P11 OS-APR-84 16:45 SEQ 0127 
6904 030026 005067 147734 TRYMC: CLR CPEREG ;CLEAR CPU ERROR REGISTER 
6905 030032 016767 152724 147744 MOV SLOCOO,4 sRESTORE VECTOR 
ot 030040 012706 001000 MOV #STBOT ,.R6 
6908 
6909 ; 
rt 030044 MILLO: 

6912 3 TEST STACK OVERFLOW ON ILLEGAL INST TRAP 

6913 030044 005067 147716 CLR CPEREG ;CLEAR CPU ERROR REGISTER 
6914 030050 012706 000400 MOV #400 ,R6 sSETUP FOR OVERFLOW TRAP 
6915 030054 016767 147730 152700 MOV 10,SL0COO ;SAVE VECTOR 

6916 030062 012767 030110 147720 MOV #MILLOA,10 ;SETUP ILLEGAL TRAP VECTOR 
6917 030070 016767 147710 152666 MOV 4,SLO0CO1 sSAVE VECTOR 

6918 030076 012767 030116 147700 MOV @MILLOB ,4 sSETUP OVERFLOW TRAP VECTOR 
6919 030104 000077 77 ;UNUSED INSTRUCTION TRAP 
6920 030106 000240 NOP 

6921 030110 012706 001000 MILLOA: MOV #STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
6922 030114 104001 ERROR +1 ;CPU ERROR 

6923 sUNUSED INSTRUCTION TRAP 

6924 030116 MILLOB: 

6925 030116 016767 152642 147660 MOV $toco1,4 sRESTORE VECTOR 

6926 030124 016767 152632 147656 MOV SLOCOO,10 sRESTORE VECTOR 

6927 030132 005067 147630 CLR CPEREG ;CLEAR CPU ERROR REGISTER 
te 4 030136 012706 001000 MOV #STBOT ,R6 sRESTORE R6 

6930 

6931 

6932 ; 

6933 030142 MIOTO: 

6934 

6935 ; TEST STACK OVERFLOW ON IOT TRAP 

6936 030142 005067 147620 CLR CPEREG ;CLEAR CPU ERROR REGISTER 
6937 030146 012706 000400 MOV #400 ,R6 ;SETUP STACK FOR OVERFLOW 
6938 030152 016767 147642 152602 MOV 20,SLOCOO ;SAVE OLD IOT VECTOR 
6939 030160 012767 030206 147632 MOV #IOTOA,20 ;SETUP ERROR ACTION ON IOT 
6940 030166 016767 147612 152570 MOV 4,SLOCO1L sSAVE VECTOR 

6941 030174 012767 030214 147602 MOV #IOTOB,4 ;SETUP CORRECT TRAP VECTOR FOR 
6942 3; OVERFLOW 

6943 030202 000004 IoT ; TEST INSTRUCTION 
6944 030204 000240 NOP 

6945 030206 012706 001000 IOTOA: MOV #STBOT ,R6 sRESTORE R6 FOR ERROR CALL 
6946 030212 104001 ERROR +1 ;CPU ERROR 

6947 sFAILURE OF STACK OVERFLOW 
6948 030214 IOTOB: 

6949 030214 005067 147546 : CLR CPEREG ;CLEAR CPU ERROR REGISTER 
6950 030220 012706 001000 MOV #STBOT,R6 

6951 030224 016767 152534 147552 MOV SLOCO1,4 sRESTORE VECTOR 

Be 030232 016767 152524 147560 MOV SLOCOO, 20 sRESTORE TRAP VECTOR 
6954 : 

6955 : 

6956 030240 MEMTO: 

6957 

6958 ; TEST STACK OVERFLOW ON EMT TRAP 

6959 030240 005067 147522 CLR CPEREG ;CLEAR CPU ERROR REGISTER 
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030332 
030336 


030336 
030342 
030346 
030354 
030362 
030370 


030376 
030400 
030402 
030406 


030410 
030410 
030416 
030424 
030430 


030434 
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012706 
016767 
012767 
016767 
012767 


104000 
000240 
012706 
104001 


016767 


012767 


104400 
000240 
012706 
104001 


016767 
016767 
005067 
012706 


005067 
012706 
016767 
012767 
016767 
012767 


000003 
000240 
012706 
104001 
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000400 
147554 
030304 
147514 
030312 


001000 


152444 
152440 
147434 
001000 


147424 
000400 


147462 
030402 
147416 
030410 


001000 


152346 
152342 
147336 
001000 


147326 


000400 
147344 
030500 
147320 
030506 


001000 
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152504 
147544 
152472 
147504 


147510 
147456 


152406 
147452 
152374 
147406 


147416 
147360 


152310 
147334 
152276 
147310 


sSETUP STACK FOR OVERFLOW 
sSAVE OLD EMT VECTOR 

sSETUP ERROR ACTION ON EMT 
sSAVE VECTOR 

;SETUP CORRECT TRAP VECTOR FOR 
; OVERFLOW 

+ TEST INSTRUCTION 


sRESTORE R6 FOR ERROR CALL 


sFAILURE OF STACK OVERFLOW 


sRESTORE TRAP VECTOR 
RESTORE VECTOR 


H 
;CLEAR CPU ERROR REGISTER 


;CLEAR CPU ERROR REGISTER 


;SETUP STACK FOR OVERFLOW 
;SAVE OLD TRP VECTOR 

;SETUP ERROR ACTION ON TRP 
;SAVE VECTOR 

;SETUP CORRECT TRAP VECTOR FOR 
; OVERFLOW 

; TEST INSTRUCTION 


sRESTORE R6 FOR ERROR CALL 


sFAILURE OF STACK OVERFLOW 


sRESTORE TRAP VECTOR 
sRESTORE VECTOR 


;CLEAR CPU ERROR REGISTER 


;CLEAR CPU ERROR REGISTER 


sSETUP STACK FOR OVERFLOW 
;SAVE OLD BPT VECTOR 

;SETUP ERROR ACTION ON BPT 
;SAVE VECTOR 

;SETUP CORRECT TRAP VECTOR FOR 
; OVERFLOW 

; TEST INSTRUCTION 


sRESTORE R6 FOR ERROR CALL 


16:45 PAGE 129 
OOOO HRERED DOUBLE OPERA TESTS e60404464004060668 
MOV #400 ,R6 
MOV 30,SLOCOO 
MOV #EMTOA, 30 
MOV 4,SLOCO1 
MOV #EMTOB ,4 
EMT 
NOP 
EMTOA: MOV #STBOT ,R6 
ERROR +1 ;CPU ERROR 
EMTOB: 
MOV SLOCOO, 30 
MOV St0C01,4 
CLR CPEREG 
MOV #STBOT ,R6 
MTRPO: 
; TEST STACK OVERFLOW ON TRAP 
CLR CPEREG 
MOV #400 ,R6 
MOV 34 ,SLOCOO 
MOV #TRPOA, 34 
MOV 4,SLOCOL 
MOV #TRPOB 4 
TRAP 
TRPOA: MOV #STBOT ,R6 
ERROR . ;CPU ERROR 
TRPOB 
MOV SLOCOO, 34 
MOV SLOCO1,4 
CLR CPEREG 
MOV #STBOT ,R6 
; 
a 
MBPTO: 
: TEST STACK OVERFLOW ON BPT 
CLR CPEREG 
MOV #400 ,R6 
MOV 14,SLOCOO 
MOV #BPTOA,14 
MOV 4,SLOCO1 
MOV #BPTOB ,4 
BPT 
NOP 
BPTOA: MOV #STBOT ,R6 
ERROR +1 ;CPU ERROR 


BPTOB;: 


sFAILURE OF STACK OVERFLOW 


SEQ 0128 
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7017 
7018 
7019 
7020 
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030506 
030512 
030520 
030526 


030722 


005067 
016767 
016767 
012706 


005067 
012706 
016767 
012767 
016767 
012767 


005001 
000101 
000240 
012706 
104001 


016767 


012706 
016767 
012767 
016767 
012767 


016767 
016767 
012706 
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147254 
152244 
152240 
001000 


000400 
147146 
030674 
147126 
030702 


001000 


152056 
152046 
001000 
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147274 
147256 


152212 
147232 
152200 
147212 


147170 
147166 


152116 
147136 
152104 
147116 


147074 
147072 


M1LO 


‘ 
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OS-APR-84 16:45 PAGE 
CLR CPEREG 
MOV SLOCOO, 14 
MOV SLOCO1,4 
MOV #STBOT ,R6 

H 

3 

MILAO: 

3 
CL 
MOV #400 ,R6 
MOV 10,SLOCOO 
MOV #ILAOA,10 
MOV 4,SLOCOL 
MOV #ILB0B ,4 
CLR R1 
JMP R1 
NOP 

ILAOA: MOV #STBOT ,R6 
ERROR ol 

ILB0B 
MOV SLOCO1,4 
MOV SLOCOO, 10 
CLR CPEREG 
MOV #STBOT ,R6 

8 

3 

MILLBO: 

3 
MOV 
MOV 10, SLOCOO 
MOV #ILLBOA, 10 
MOV 4,SLOCO1 
MOV #ILLBOB,4 
CLR R1 
JSR R5,R1 
NOP 

ILLBOA: MOV #STBOT ,R6 
ERROR . 

ILLBOB: 
MOV St0COo1,4 
MOV StLOCOO,10 
MOV #STBOT ,R6 

3 

3 

MSTO: 


TEST FOR FALSE STACK OVERFLOW 


;CPU ERROR 
sFAILURE OF STACK OVERFLOW 


TEST STACK OVERFLOW ON ILLEGAL JSR INST 
#400 ,R6 


;CPU ERROR 
sFAILURE OF STACK OVERFLOW 


sCLEAR CPU ERROR REGISTER 


sRESTORE TRAP VECTOR 
sRESTORE VECTOR 


TEST STACK OVERFLOW AND ILLEGAL JMP INSTRUCTION 
R CPEREG ;CLEAR CPU ERROR REGISTER 


;SETUP STACK FOR OVERFLOW 

sSAVE OLD ILLEGAL INST. VECTOR 
;SETUP ERROR ACTION ILLEGAL OPCODE 
sSAVE VECTOR 

;SETUP CORRECT TRAP VECTOR FOR 

; OVERFLOW 


; TEST INSTRUCTION 
sRESTORE R6 FOR ERROR CALL 


sRESTORE VECTOR 
sRESTORE TRAP VECTOR 


;CLEAR CPU ERROR REGISTER 


;SETUP STACK FOR OVERFLOW 

:SAVE OLD VECTOR 

sSETUP ERROR ACTION ON ILL. OPCOCE 
;SAVE VECTOR 

;SETUP CORRECT TRAP VECTOR FOR 

; OVERFLOW 


; TEST INSTRUCTION 
sRESTORE R6 FOR ERROR CALL 


sRESTORE VECTOR 
sRESTORE TRAP VECTOR 


SEQ 0129 
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7072 
7073 


031004 
031012 


031016 


031016 
031022 
031030 
031034 
031040 
031046 
031050 


031052 
Oo 954 
( ‘60 
U..1V62 


031064 
031070 
031072 


031074 
031074 


031102 
031106 


031106 
031112 
031120 
031124 
031130 


016767 


016767 
012706 


012706 
016767 
012746 
012746 
012767 
000002 
104001 
104001 


022706 
001401 
104001 


021627 
001401 
104001 


016767 
012706 


012706 
016767 
012746 
012746 
012767 


147056 
030776 
001002 
002002 
004002 
010002 


100402 


001000 


151752 
001000 


031052 
031054 


031052 


151662 
001000 


031142 
031146 


152032 
147046 


146772 


151732 


146746 


146712 


151642 


146656 


N10 
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OOF b4FOOREEE DOUBLE OPERAND TESTS s«seseseseeesaseee 


MTTA: 
MTTA: 


MTTO: 


MTTE: 


MSTOEE 
#STBOT ,R6 
+1 


SLOCOO ,4 
#STBOT ,R6 


TEST T-BIT TRAPS 


;SAVE VECTOR 
sANTICIPATE OVERFLOW ERROR 
sSETUP LEGAL R6 
s;TRY TO CAUSE STACK OVERFLOW 
;SETUP LEGAL AG 
sTRY TO CAUSE ST“CK OVERFLOW 
;SETUP LEGAL R6 
;TRY TO CAUSE STACK OVERFLOW 
;SETUP LEGAL R6 
sTRY TO CAUSE a OVERFLOW 
sSETUP LEGAL R 
;TRY TO CAUSE STACK OVERFLOW 
3EXIT MODULE 
sRESTORE R6 FOR ERROR CALL 
;CPU ERROR 
s;STACK OVERFLOW ERROR 
sRESTORE VECTOR 


MOV #STBOT ,R6 ;SETUP STACK 
MOV 14, SLOCOO ;SAVE OLO T-BIT VECTOR 
MOV #20, -(R6) ;PUSH T-BIT 
MOV OMTTA, -C(R6) ;SETUP ERROR TRAP VECTOR 
MOV #mMTTB,14 ;SETUP NEW T-BIT VECTOR 
RTI ;CAUSE A T BIT SET IN PSW 
ERROR ol ;CPU ERROR 

;SHOULD NEVER BE EXECUTED 
ERROR +l ;CPU ERROR 

:DIONT TAKE CORRECT TRAP 
CMP #STBOT -4,R6 ;VERIFY SP DECIRMENT 
BEQ MTTO ;BRANCH IF GOOD 
ERROR +1 ;CPU ERROR 

;BAD SP : 
CMP (R6), aMTTA sVERIFY PC SAVED ON STACK 
BEQ MTTE ;BRANCH IF GOOD 
ERROR +1 ;CPU ERROR 

; INCORRECT PC ON STACK 
MOV SLOCOO,14 ;RESTORE VECTOR 14 
MOV #STBOT ,R6 
TEST T-BIt TRAPS WITH RTT 
MOV @STBOT ,R6 3SETUP STACK 
MOV 14,SL0C00 :;SAVE OLO T-BIT VECTOR 
MOV #20, -(R6) 3PUSH T-BIT 
MOV MMTTSA, -CR6) s;SETUP ERROR TRAP VECTOR 
MOV #MTTSB,14 ;SETUP NEW T-BIT VECTOR 


SEQ 0130 


B11 
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COKDAB.P11 05 -APR -84 16:45 eeeeeeeseooe DOUBLE OPERAND TESTS eeccescsseeeeeoes SEQ 0171 
"128 O81136 000006 RTT sCAUSE AT BIT SET IN PGW 
7129 081140 104001 FRROR ol ;CPU ERROR 
7180 :SHOULD NEVER BE EXECUTED 
7i3L O31142 000240 MTTSA: NOP sRTT WILL EXECUTE THIS INSTRUCTION 
7132 sWITH A T-BIT TRAP 
7133 031144 104001 MTTSQ: ERROR ol sCPU ERROR 
7134 sOIONT TAKE CORRECT TRAP 
7135 031146 022706 000774 MTTSB: CMP @STBOT 4,R6 sVERIFY SP DECIRMENT 
7136 031152 001401 BEQ MTTSO sBRANCH IF GOOD 
7137 031154 104001 ERROR ol ;CPU ERROR 
7138 36AD0 SP 
7139 O31156 021627 031144 MTTSD CMP (R6),OMTTSO sVERIFY PC SAVED ON STACK 
7140 O381162 001401 BEQ MI TSE sBRANCH IF GOOD 
714i) 031164 104001 ERROR ol ;CPU ERROR 
714) s INCORRECT PC ON STACK 
7143) 6031166 MTTSE: 
7144 031166 016767 151570 146620 MOV SLOCOO,14 sRESTORE VECTOR 14 
vias 031174 012706 001000 MOV OSTBOT ,R6 
7146 
7147 031200 MTTR: 
7148 
7149 : TEST OLD STATUS ON T-BIT TRAP 
7150 031200 012706 001000 MOV OSTBOT .R6 sSETUP STACK 
7151 031204 016767 146604 151550 MOV 14,SLOCOO sSAVE OLD VECTOR 
7152 031212 012746 000020 MOV 20, -(R6) 3PUSH T-BIT 
7153 031216 012746 031244 MOV OMTTRA, -(R6) sSETUP ERROR TRAP VECTOR 
7154 031222 012767 031246 146564 MOV OMTTRB,14 ,SETUP NEW T-BIT VECTOR 
7155 031230 012767 000357 146540 MOV 0357,PS 3SET PRIORIT: AND COND C 
7150 031236 000277 scc 
7157 031240 000002 RTI 
7158 031242 104001 FRROR ol 3;CPuU ERROR 
7159 sSHOULD NEVER EXECUTE 
7160 031244 104001 MTTRA; ERROR ol 3CPuU ERROR 
716i sDIONT TAKE CORRECT TRAP 
7162 031246 026727 147524 000020 MTTRB: CMP STBOT -2,020 sVERIFyY PSW ON STACK 
7163 031254 001401 BEQ MTTRC sBRANCH IF CORRECT STATUS 
7164 031256 104001 ERROR ol :CPU ERROR 
7165 3BAD STATUS ON STACK 
7166 031260 012706 001000 MTTRC: MOV @STBOT ,R6 sSETUP STACK 
7167 031264 012746 000377 MOV 0377, -(R6) 3PUSHM T-BIT 
7168 031270 012746 031316 MOV OMTTRO, (RE) sSETUP ERROR TRAP VECTOR 
7169 031274 012767 031320 146512 MOV OMTTRE ,14 sSETUP NEW T BIT vECTOR 
7170 031302 012767 000000 146466 MOV @0,PS ;CLEAR PRIORITY 
7171 041310 000257 coe sCLEAR CONDITION CODES 
7172 031312 000002 RTI 
7173 031314 104001 ERROR ol 3;CPU ERROR 
7174 sSMOULD NEVER EXECUTE 
7175 031316 104001 MTTRD: ERROR ol :CPU ERROR 
7176 :OIONT TAKE CORRECT TRAP 
7177 031320 026727 147452 000377 MTTRE: Crt by oa 2,937? sVERIFY OLO PSW ON STACK 
7178 031326 001401 BEQ MT TRE sBRANCH IF GOOD 
7179 031330 104001 ERROR ol ;CPU ERROR 
7180 s0LD PSW INCORRECT 
7181 031332 MTTRF; 
7182 031332 016767 151424 146454 MOV SLOCOO,14 sRESTORE VECTOR 
718% 031340 012706 001000 MOV OSTBOT Re 
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151404 
146424 


146372 


151326 
146346 


146310 


146270 


000357 


146254 
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PAGE 15 
eoereecoooee DOUBLE OFF RAND TESTS seeccacsescseseoes 


MRT; 
H TEST RESERVED INST TRAP 
MOV oSTBOT ,R6 sSETUP STACK 
MOV 10,SL0C0O0 sSAVE OLD VECTOR 
7 OMRTB,10 sSETUP NEW RESERVED VECTOR 
MRTA: ERROR ol ;CPU ERROR 
sOLONT TAKE CORRECT TRAP 
MRTB CMP oSTBOT 4,R6 s;VERIFY SP DECRIMENT 
BEQ MRTE sBRANCH IF GOOD 
ERROR ol ;CPU ERROR 
sBAD PC ON STACK 
MRTE: CMP (R6),OMRTA sVERFY PROPER PC ON STACK 
BEQ MRTF sBRANCH IF GOOD 
ERROR ol 3CPU ERROR 
mir s INCORRECT PC ON STACK 
MOV SLOCOO,10 sRESTORE TRAP VECTOR 
MOV @STBOT ,R6 
} 
o 
MRTO: 
3 TEST OLD STATUS ON RESERVED INST TRAP 
MOV eSTBOT ,R6 sSETUP STACK 
MOV 10, SLOCOO sSAVE OL1O VECTOR 
MOV OMRTOB, 10 +e TUP NEW VECTOR 
CLR PS sCLEAR PRIORITY AND COND C 
ccc 
77 
MRTOA: ERROR ol 3CPU ERROR 
sOIONT TAKE CORRECT! TRAP 
MRTOB: CMP STBOT -2,40 sVERIFy PSW ON STACK 
BEQ MRTOC sBRANCH IF CORRECT STATUS 
ERROR ol 3;CPU ERROR 
3BAD STATUS ON STACK 
MRTOC: MOV #STBOT,R6 sSETUP STACK 
MOV OMRTOE ,10 3SET UP TRAP VECTOR 
MOV @357,PS 3SET PRIORITY 
scc 3SET CONDITION CODES 
77 sRESERVED INSTRUCTION 
MRTOD: ERROR +l ;CPU ERROR 
sOIONT TAKE CORRECT TRAP 
MRTOE: CMP STBCT -, 0357 sVERIFY OLD PSW ON STACK 
BEQ MR TOF sBRANCH IF GOOD 
ERROR ol 3CPuU ERROR 
3010 PSW INCORRECT 
MRTIOF: 
MOV SLOCOO,10 sRESOTRE TRAP VECTOR 
MOV OSTBOT ,Re 
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SOoeeeeeaees DOUBL F OPERAND TESTS eeseeseseeesesers 
MTP; 
: TEST TRAP INST 
MOV @STBOT ,R6 sSETUP STACK 
MOV 34,SLOCOO sSAVE OLD VECTOR 
MOV anteb Se s;SETUP NEW TRAP VECTOR 
4 PS sCLEAR PRIORITY ABND COND C 
TRAP 
MTPR: ERROR ol sCPU ERROR 
sOLONT TAKE CORRECT TRAP 
MTPB: cmp #STBOT -4,R6 ;VERIFY SP DECRIMENT 
BEQ MTPQ sBRANCH IF GOOD 
ERROR ol ;CPU ERROR 
;BAD PC ON STACK 
MTPQ;: CMP (R6),@MTPR ;VERFY PROPER PC ON STACK 
BEQ MTPF s;BRANCH IF GOOD 
ERROR ol ;CPU ERROR 
s INCORRECT PC ON STACK 
MTPF: 
MOV SLOCOO, 34 sRESTORE VECTOR 
MOV @STBOT,R6E 
3 
H 
MTPO 
H TEST OLD STATUS SAVED ON TRAP 
MOV @STBOT RS sSETUP STACK 
MOV 34,SLO0COO sSAVE OLO VECTOR 
MOV OMTPOB , 34 ;SETUP NEW TRAP VECTOR 
ee PS ;CLEAR PRIORITY AND COND C 
TRAP 
MTPOA: ERROR ol 3;CPU ERROR 
sOIONT TAKE CORRECT TRAP 
MTPOB: CMP STBOT -2,¢0 sVERIF 1 PSW ON STACK 
BEQ MTPOC sBRANCH IF CORRECT STATUS 
ERROR ol ;CPU ERROR 
3BAD STATUS ON STACK 
MTPOC: MOV @STBOT ,R6 sSETUP STACK 
MOV OMTPOE , 34 3;SET UP TRAP VECTOR 
MOV ©357,PS ;SET PRIORITY 
$cc 3SET CONDITION CODES 
TRAP ; ISSUE TRAP 
MTPOD: ERROR +l ;CPU ERROR 
sOIONT TAKE CORRECT TRAP 
MTPOE: CMP A al 2,0357 sVERIFY OLD PSW ON STACK 
BEQ MTPOF sBRANCH IF GOOD 
ERROR ol 3;CPU ERROR 
201.0 PSW INCORRECT 
MTPOF ;: 
MOV SLOCOO, 34 sRESTORE TRAP VECTOR 
MOV #STBOT ,R6 
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001401 
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001000 
000400 


104400 
177740 
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145722 
032112 


000774 
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151004 
151000 
146012 
146034 


177744 


145760 
145722 


150662 
145712 


Ell 


- SELF MODIFYING 


sSETUP REGISTER TO INDICATE OPCODE 
sSETUP STACK 

sSAVE OLD VECTOR 

sSAVE IN CASE OF HALT 

sSETUP HALT TRAP 

sSETUP NEW TRAP VECTOR 

sGO INTO LOOPING CODE 


sSET TO A ZERO 

;CPU ERROR 

;TRAP INSTRUCTION FAILED TO TRAP 
sEXAMINE OPCCODE AT LOCATION MTPAL: 
sATTEMPT TO GO ON 


:CPU ERROR 
sERROR, EITHER CANT MODIFY LOCATION MTPAL 
;OR TRAP INSTRUCTION FAILED 


;GET NEXT OPCODE 


sRESTORE STACK 
:SEE IF LAST OPCODE 
;BRANCH IF DONE 

sTRAP OPCODE INTO LOCATION 
sFORM TEST OPCODE 

sEXECUTE TEST 


sRESTORE VECTORS 


sSETUP STACK 
sSAVE OLO VECTOR 
;SETUP NEW [TOT VECTOR 


;CPU ERROR 

sDIONT TAKE CORRECT TRAP 
;VERIFY SP DECRIMENT 
sBRANCH IF GOOD 

3CPU ERROR 

;BAD PC ON STACK 
3;VERFY PROPER PC ON STACK 
sBRANCH IF GOOD 


O5-APR-84 16:45 PAGE 135 
eeeeeeeeeeass DOUBLE OPERAND TESTS eeesesesasasseses 
e 
MTPA: 

: TEST ALL. TRAP OPCODES 

CLR R3 

MOV @#STBOT ,R6 
MOV 34,SLOCOO 
MOV 4,SLO0CO1 
MOV OMTPAH,4 
MOV aMTPAA, 54 
JMP MTPAA 

3 
MTPAL: HALT 

JMP MTPAA 
a 
MTPAH: ERROR +l 
MTPAA: 
INC R3 
MOV #STBOT ,R6 
CMP R3, 2400 
BEQ MTPAE 
MOV #104400 ,MTPAL 
ADD R3,MTPAL 
BR MTPAL 
MTPAE: 
MOV SLOCOO, 34 
MOV $t0C01,4 
MOV OSTBOT ,R6 
H 
MIOT; 
H TEST IOT TRAP 
MOV #STBOT ,R6 
MOV 20,SLOCOO 
MOV #mMLOTB,20 
Ior 

MIOTA: ERROR ol 

MIOTB: CMP #STBOT -4,R6 
BEQ MIOTD 
ERROR ol 

MIOTD:. CMP (R6),e@MIOTA 
BEG MIOTF 
ERROR +1 


sCPU ERROR 
s INCORRECT PC ON STACK 


SEQ 0134 


Fil 
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COKDAB .P11 05 -APR-84 16:45 eeeeeeeecece DOUBLE OPERAND TESTS eeesesesacesacess SEQ 0135 
7352 «032132 016767 150624 145660 MIOTF: MOV SLOCOO, 20 sRESTORE VECTOR 
He oy 032140 012706 001000 MOV @STBOT,R6 
7355 032144 MITO: 
7356 
7887 ; TEST OLD STATUS ON IOT TRAP 
7358 032144 012706 001000 MOV @STBOT ,R6 sSETUP STACK 
7359 032150 016767 145644 150604 MOV 20, SLOCOO ;SAVE OLD VECTOR 
7360 032156 012767 032176 145634 MOV OMITOB,20 sSETUP NEW IOT VECTOR 
7361 032164 005067 145606 CLR PS ;CLEAR PRIORITY AND COND C 
7362 032170 000257 ccc 
7363 032172 000004 IoT 
73643 032174 104001 MITOA: ERROR ol ;CPU ERROR 
7365 sDIDNT TAKE CORRECT TRAP 
7 032176 026727 146574 000000 MITOB: CMP STBOT-2,00 sVERIFY PSW ON STACK 
7367 032204 001401 BEQ MITOC sBRANCH IF CORRECT STATUS 
7368 032206 i04001 ERROR +1 ;CPU ERROR 
7369 sBAD STATUS ON STACK 
7370 032210 012706 001000 MITOC: MOV OSTBOT ,R6 ;SETUP STACK 
7371 032214 012767 032236 145576 MOV OMITOE ,20 ;SET UP TRAP VECTOR 
7372 032222 012767 000357 145546 MOV @357,PS 3SET PRIORITY 
7373 032230 000277 scc 3SET CONDITION CODES 
7374 032232 000004 IoT 
7375 032234 104001 MITOD: ERROR ol ;CPU ERROR 
7376 ;OIDNT TAKE CORRECT TRAP 
7377 032236 026727 146534 000357 MITOE: CMP STBOT-2,0357 ;VERIFY OLD PSW ON STACK 
7378 032244 001401 BEQ MITOF sBRANCH IF GOOD 
7379 032246 104001 ERROR ol ;CPU ERROR 
7380 ;0LD PSW INCORRECT 
7381 032250 MITOF; 
7382 032250 016767 150506 145542 MOV SLOCOO, 20 sRESTORE VECTOR 
oes 032256 012706 001000 MOV @STBOT ,R6 
7385 3 
7386 032262 MET: 
7387 
7388 3 TEST EMULATOR TRAP INSTRUCTION (EMT) 
7389 032262 012706 001000 MOV @STBOT RE sSETUP STACK 
7390 032266 016767 145536 150466 MOV 30, SLOCOO ;SAVE OLD VECTOR 
739i 032274 012767 032330 145526 MOV OME TB, 30 sSETUP NEW EMT VECTOR 
7392 032302 016767 145526 150454 MOV 34,SLOCOL ;SAVE TRAP VECTOR 
7393 032310 012767 134132 145516 MOV @sERROR, 34 ;SET UP TO HANDLE EMT ERROR 
7394 032316 104000 EMT 
7395 032320 104400 META; TRAP 3; TRAP ON ERROR 
7396 032322 001057 «WORD 559, 
7397 032324 000001 . WORD 1 —- 
7398 032326 000001 . WORD 1 ;ERR 
7399 sOIONT TAKE CORRECT TRAP 
7400 032330 022706 000774 ME TB: CMP &STBOT -4,R6 ;VERIFY SP DECRIMENT 
7401 032334 001401 BEG ME TD sBRANCH IF GOOD 
7402 032336 104001 ERROR +1 ;CPU ERROR 
7403 ;BAD PC ON STACK 
7404 032340 021627 032320 ME TO: CMP (R6),OMETA sVERFY PROPER PC ON STACK 
7405 032344 001401 BEQ ME TF sBRANCH IF GOOD 
7406 032346 104001 ERROR ol ;CPU ERROR 


7407 s INCORRECT PC ON STACK 
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150410 
150400 
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eeeeeeeeeeee DUUBLE OPERAND TESTS eeeessesecesasecs 


METF: MOV SLOCO1, 34 sRESTORE VECTOR 
MOV SLOCOO, 30 sRESTORE VECTOR 
MOV @STBOT ,R6 
3 
METO: 
3 TEST OLD ST . o EMT TRAP 
MOV @STBOT,R sSETUP STACK 
MOV 30, SLOeOO :SAVE OLD VECTOR 
MOV OME TOB, 30 ;SETUP NEW EMT VECTOR 
MOV 34,SL0CO1 ;SAVE TRAP VECTOR 
MOV @sSERROR, 34 ;SET UP TRAP VECTOR 
CLR PS ;CLEAR PRIORITY AND COND © 
ccc 
EMT 
METOA: TRAP 
. WORD 562. 
. WORD 1 3; CPUERR 
. WORD 1 sERRTN 
sOIONT TAKE CORRECT TRAP 
METOB: CMP STBOT -2,900 sVERIFY PSW ON STACK 
BEQ ME TOC sBRANCH IF CORRECT STATUS 
ERROR +1 ;CPU ERROR 
;BAD STATUS ON STACK 
METOC: MOV @STBOT RE sSETUP STACK 
MOV OME TOE , 30 ;SET UP TRAP VECTOR 
MOV @357,.PS ;SET PRIORITY 
poe 3SET CONDITION CODES 
METOD: TRAP 
.» WORD 564. 
~WORD 1 ;CPUERR 
. WORD 1 ;ERRTN 
sO0IDN’ TAKE CORRECT TRAP 
METOE: CMP STBOT -2,0357 sVERIFY OLD PSW ON STACK 
BEG ME TOF sBRANCH IF GOOD 
ERROR ol 3CPU ERROR 
30LD PSw INCORRECT 
ME TOF 
MOV SLOCO1, 34 sRESTORE VECTOR 
MOV St.0CO00, 30 sRESTORE VECTOR 
MOV @STBOT,R6 
3 
3 
MBIT: 
F TEST BPT TRAP 
MOV @STBOT ,R6 sSETUP STACK 
MOV 14,5. 0C00 sSAVE OLD VECTOR 
aot omMB1B,14 ;SETUP NEW BPY VECTOR 
MBTA;: ERROR el ;CPU ERROR 
sDIDNT TAKE CORRECT TRAS 
MBIB: CMP @STBOT 4,Re sVERIFY SP DECRIMENT 


SEQ 0136 


Hi 1 
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COKDAB.P11 O05 APR -84 16:45 eeeeeeeeesoe DOUBLE OPERAND TESTS eeeesseseeseeeces SEQ 90137 
7464 «4032574 001401 BEQ MBTD sBRANCH IF GOOD 
7465 032576 104001 ERROR +1 ;CPU ERROR 
7460 ;BAD PC ON STACK 
7407 032600 021627 032566 MBITD: CMP (R6),@MBTA sVERFY PROPER PC ON STACK 
7468 032604 001401 BEQ MBTF sBRANCH IF GOOD 
74609 032606 104001 ERROR ol ;CPU ERROR 
7470 s INCORRECT PC ON STACK 
747i 032610 016767 150146 145176 MBITF: MOV SLOCOO,14 sRESTORE VECTOR 
74 ie 032616 012706 001000 MOV @STBOT ,R6 
747 
7474 : 
747 3 
ed 032622 MBTO: 
7478 : TEST OLD STATUS ON BPT TRAP 
7379 032622 012706 001000 MOV #STBOT ,R6 ;SETUP STACK 
7480 032626 016767 145162 150126 MOV 14, SLOCOO sSAVE OLD VECTOR 
7481 032634 012767 032654 145152 MOV oMBTOB, 14 sSETUP NEW BPT VECTOR 
7482 032642 005067 145130 CLR PS ;CLEAR PRIORITY AND COND C 
7483 032646 000257 ccc 
7484 032650 000003 BPT 
7485 032652 104001 MBTOA: ERROR ol ;CPU ERROR 
7486 sOIONT TAKE CORRECT TRAP 
7487 032654 026727 146116 000000 MBTOB: CMP STBOT -2,90 sVERIFY PSW ON STACK 
7488 032662 001401 BEQ ™B TOC sBRANCH IF CORRECT STATUS 
7489 032664 104001 ERROR +1 ;CPU ERROR 
7890 ;BAD STATUS ON STACK 
7491 032666 012706 001000 MBTOC: MOV #STBOT ,R6 sSETUP STACK 
7492 032672 012767 032714 145114 MOV OMBTOE ,14 ;SET UP TRAP VECTOR 
7493 032700 012767 000357 145070 MOV @357,PS 3;SET PRIORITY 
7494 032706 000277 scc 3SET CONDITION CODES 
7495 032710 000003 BPT 
7496 032712 104001 MBTOD: ERROR +1 ;CPU ERROR 
7497 s;DIDNT TAKE CORRECT TRAP 
7498 032714 026727 146056 000357 MBTOE: CMP STBOT-2,9357 sVERIFyY OLD PSW ON STACK 
7499 032722 001401 BEG MB TOF sBRANCH IF GOOD 
7500 032724 104001 ERROR 1 ;CPU ERROR 
7501 :0LD PSW INCORRECT 
7502 032726 MBTOF ; 
7503 032726 016767 150030 145060 MOV SLOCOO,14 sRESTORE VECTOR 
vos 032734 012706 001000 MOV #STBOT ,R6 
7506 Hy 
7507 : 
7508 032740 MIL: 
7509 
7510 : TEST ILLEGAL JUMP INSTRUCTION TRAP 
7511 032740 012706 001000 MOV &STBOT,R6 sSETUP STACK 
7512 032744 016767 145040 150010 MOV 10,St0C00 sSAVE OLD VECTOR 
7513 032752 012767 032766 145030 MOV oMILB,10 sSETUP NEW ILLEGAt VECTOR 
7514 032760 005001 CLR R1 
7515 032762 000101 JMP R1 seeTEST INSTRUCTIO 
7516 032764 104001 MILA: ERROR +1 ;CPU ERROR 
7517 ;DIONT TAKE CORRECT TRAP 
7518 032766 022706 000774 MILB: CMP #STBOT -4,R6 ;VERIFY SP DECRIMENT 


519 O382772 001401 BEQ MILD sBRANCH IF GOOD 


I11 
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COKDAB P11 O05 -APR-84 16:45 eeeeeseeeees DOUBLE OPERAND TESTS eecseacsccscncocs SEQ 0138 
"S20 03277 104001 ERROR +1 sCPU ERROR 
7S21 ;BAD PC ON STACK 
7522 032776 021627 032764 MILD: CMP (R6), MILA sVERFY PROPER PC ON STACK 
75238 033002 001401 BEQ MILF ;BRANCH IF GOOD 
7524 033004 104001 ERROR +1 ;CPU ERROR 
7525 s INCORRECT PC ON STACK 
7526 033006 016767 147750 144774 MILF: MOV SLOCOO, 10 sRESTORE VECTOR 
ty Hf 033014 012706 001000 MOV @STBOT,R6 
its 34 033020 MILO: 
7531 3 TEST OLD STATUS ON ILLEGAL JUMP TRAP 
7532 033020 012706 001000 MOV @STBOT ,R6 sSETUP STACK 
7533 033024 016767 144760 147730 MOV 10,SL0CO0O sSAVE OLD VECTOR 
7534 033032 012767 033054 144750 MOV oMILOB,10 ;SETUP NEW ILLEGAL VECTOR 
7535 033040 005067 144732 CLR PS sCLEAR PRIORIT?r AND COND C 
7536 033044 000257 ccc 
7537 033046 005001 CLR R1 
7538 033050 000101 JMP R1 
7539 033052 104001 MILOA: ERROR +1 ;CPU ERROR 
7540 sDIONT TAKE CORRECT TRAP 
7541 033054 026727 145716 000004 MILOB: CMP STBOT-2, 04 sVERIFY PSW ON STACK 
7542 033062 001401 BEQ MILOC sBRANCH IF CORRECT STATUS 
75435 033064 104001 ERROR +l ;CPU ER?OR 
7544 :BAD STATUS ON STACK 
7545 033066 012706 001000 MILOC: MOV @STBOT ,R6 sSETUP STACK 
7546 033072 012767 033114 144710 MOV @MILOE,10 ;SET UP TRAP VECTOR 
7547 033100 012767 000357 144670 MOV @357,PS ;SET PRIORITY 
7548 033106 000277 scc 3SET CONDITION CODES 
7549 033110 000101 JMP R1 
7550 033112 104001 MILOD: ERROR ol ;CPU ERROR 
7551 sOIONT TAKE CORRECT TRAP 
7552 033114 026727 145656 000357 MILOE: CMP STBOT -2,0357 sVERIFY OLD PSW ON STACK 
7553 033122 001401 BEQ MILOF sBRANCH IF GOOD 
7554 033124 104001 ERROR ol ;CPU ERROR 
7555 ;O0LD PSW INCORRECT 
7556 033126 MILOF ; 
7557 033126 016767 147630 144654 MOV SLOCOO,10 sRESTORE VECTOR 
ke 033134 012706 001000 MOV #STBOT ,R6 
7560 ; 
7561 : 
| 033140 MIALL: 
7564 : TEST ILLEGAL JSR INSTRUCTION TRAP 
7565 033140 012706 001000 MOV #STBOT ,R6 sSETUP STACK 
7566 033144 016767 144640 147610 MOV 10,SLOCOO ;SAVE OLO VECTOR 
7567 033152 012767 033166 144630 MOV #MIALLB,10 sSETUP NEW ILLEGAL VECTOR 
7568 033160 005003 CLR R3 
7569 033162 004303 JSR R3,R3 
7570 033164 194001 MIALLA: ERROR ol ;CPU ERROR 
7571 sDIDNT TAKE CORRECT TRAP 
7572 033166 022706 000774 MIALLB: CMP oSTBOT -4,R6 sVERIFY SP DECRIMENT 
7575 033172 001401 BEG MIALLD ;BRANCH IF GOOD 
757 0243174 104001 ERROR ol ;CPU ERROR 


7575 sBAD PC ON STACK 


‘ 
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033176 
033202 
033204 


033206 
033214 
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021627 
001401 
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016767 
012706 
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001401 
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016767 
012706 


005067 
016767 
012767 
012767 
005737 


104001 
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001401 
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033164 


147550 


001000 


001000 
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MIALLO: CMP (R6),@MIALLA ;VERFY PROPER PC ON STACK 
BEQ MIALLF ;BRANCH IF GOOD 
ERROR +1 ;CPU ERROR 
s INCORRECT PC ON STACK 
MIALLF: MOV SLOCOO, 10 sRESTORE VECTOR 
MOV @STBOT ,R6 
a 
3 
MJSI: 
3 TEST OLD phen . ILLEGAL JSR TRAP 
MOV @STBOT sSETUP STACK 
MOV 10, States ;SAVE OLD VECTOR 
MOV @MJSIB,10 ;SETUP NEW VECTOR 
as PS ;CLEAR PRIORITY AND COND C 
CLR R3 
JSR R3,R3 
MJSIA: ERROR ol ;CPU ERROR 
sDIONT TAKE CORRECT TRAP 
MJSIB: CMP STBOT-2,04 sVERIFY PSwW ON STACK 
BEQ MJSIC ;BRANCH IF CORRECT STATUS 
ERROR ol ;CPU ERROR 
3BAD STATUS ON STACK 
MJSIC MOV @STBOT ,R6 sSETUP STACK 
MOV oMJSIE,10 ;SET UP TRAP VECTOR 
MOV 0357,PS 3SET PRIORITY 
scc 3SET CONDITION CODES 
JSR R3,R3 
MJSID ERROR +1 sCPU ERROR 
sOIONT TAKE CORRECT TRAP 
MJSIE: CMP STBOT -2, #357 ;VERIFY OLD PSW ON STACK 


BEQ MJSIF 


ERROR +l 

MJSIF; 
MOV SLOCOO,.10 
MOV &STBOT ,R6 

b 

H 

IOXXxX 

3 170 TIME OUT TEST 
CLR CPEREG 
MOV 4,SLOCOO 
MOV #2$,4 
MOV #30000 ,PS 
TST ae0177700 


1% e ERROR +1 
2s: CMP @BITO4,CPEREG 
BEQ 3$ 


;BRANCH IF GOOD 
;CPU ERROR 
;0LD PSW INCORRECT 


sRESTORE VECTOR 


;CLEAR CPU ERROR REGISTER 
sSAVE VECTOR 
;SET UP VECTOR TO HANDLE NXM 
s INIT THE PSW TO A KNOWN STATE 
sTRY TO ACCESS HARDWARE ADDRESS 
3FOR GENERAL PURPOSE REG 0. THIS 
3IS NOT IMPLEMENTED ON KOJ11 
sSHOULD CAUSE TIME OUT. 

;CPU ERROR 
3IS CPU ERROR REGISTER CORRECT? 


;CPU ERROR 


SEQ 0139 


K11 
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7632 033406 022627 033372 3$;: CMP CSP )+,@1$ ;CHECK THAT STACK CONTAINS CORRECT ADDR. 
7633 033412 001401 BEQ 4$ 3 
7634 033414 104001 ERROR +1 ;CPU ERROR 
7635 033416 022627 030000 4$: CMP (SP )+, #30000 31S THE PSW OK? 

7636 033422 001401 BEQ S$ : 
7637 033424 104001 ERROR +1 ;CPU ERROR 
7638 033426 005067 144334 S$: CLR CPEREG ;CLEAR THE CPU ERROR REGISTER 
ae 033432 016767 147324 144344 MOV SLOCOO,4 sRESTORE VECTOR 
76 
meat 033440 ODDXxX: 
7043 3 ODD ADDRESS/ILLEGAL INST FETCH TRAP TEST 
7644 3 tre PROGRAM GENERATES foe COD MOONEeA th HE OC. TE NONI Sen. 
7645 ;THIS PROGRAM — AN ODD ADDRESS IN THE PC. THE KDJ11 SHOULD 
7646 ; TRAP THROUGH ADDR 
7647 033440 005067 144322 CLR CPEREG ; INIT THE CPU ERROR REG 
7648 033444 016767 144334 147310 MOV 4,SLOCOO ;SAVE VECTOR 
7649 033452 012767 033506 144324 MOV 23,4 ;SET UP VECTOR TO HANDLE ODD ADDR TRAP 
7650 033460 016767 144322 147276 MOV 6,SLOCO1 ;SAVE VECTOR 
7651 033466 005067 144314 CLR 6 ;INIT VECTOR 
7652 033472 012746 030000 MOV #30000, -( SP) ;PUSH A KNOWN PSW ON THE STACK 
7653 033476 012746 033505 MOV #1$+1,-CSP) ;PUSH AN ODD NUMBER ON THE STACK 
7654 033502 000002 RTI sPOP ODD ADDRESS OFF STACK INTO PC 
7655 :SHOULD TRAP HERE 
7656 033504 104001 1$: ERROR +1 ;CPU ERROR 
7657 033506 022767 000100 144252 23%: CMP #BITO6,CPEREG ;IS CPU ERROR REGISTER CORRECT? 
7658 033514 001401 BEQ 3$ 
7659 033516 104001 ERROR +1 ;CPU ERROR 
7660 033520 022726 033505 3$: CMP #1$+1,(SP)-+ 31S STACK CONTENTS CORRECT? 
7661 033524 001401 BEQ 4$ 3 
7662 033526 104001 ERROR ol ;CPU ERROR 
7663 033530 022726 030000 4$: CMP #30000,(SP)-+ ;IS PSW CORRECT ON STACK? 
7664 033534 001401 BEQ S$ 3 
7665 033536 104001 ERROR +1 ;CPU ERROR 
a 033540 005067 144222 5$: CLR CPEREG ;CLEAR CPU ERROR REG 
3 
7668 ;NOW WE’LL TRY TO FETCH AN INSTRUCTION FROM AN INTERNAL REGISTER. 
7669 ;THIS SHOULD CAUSE A TRAP TO ADOR 4 AND SET BIT 6 IN THE CPU 
or sERROR REGISTER. 
3 
7672 033544 012767 033572 144232 MOV #7$,4 ;LO0AD VECTOR WITH TRAP HANDLER ADDR 
7673 033552 012767 030340 144226 MOV #30340,6 ;LOAD VEC WITH PSW VALUE ON TRAP 
7674 033560 005067 144212 CLR PS ;CLEAR THE PSW 
7675 033564 000167 144206 JMP PS peeeaseaTEST INSTRUCTIONseesases 
7676 ;TRY INSTRUCTION FETCH FROM INTERNAL 
7677 ;REGISTER-- SHOULD TRAP VIA ADDR 4 
7678 033570 104001 63: ERROR +l ;CPU ERROR 
7679 033572 016701 144200 7$: MOV PS,R1 ;SAVE CONTENTS OF PSW IN R1 
7680 033576 022767 000190 144162 CMP #BIT06,CPEREG ;IS CPU ERROR REGISTER CORRECT? 
7681 033604 001401 BEQ 8$ 3 
7682 033606 104001 ERROR +1 3;CPU ERROR 
7683 033610 022726 177776 8$: CMP #PS,CSP )> 31S STACK CONTENTS CORRECT? 
7684 033614 001401 BEQ 9$ 3 
7685 033616 104001 ERROR +1 ;CPU ERROR 


7686 033620 022726 000000 9%: CMP #0, (SP )-+ 31S STACK CONTENTS CORRECT? 
7687 033624 001401 BEQ 10$ ; 
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146710 
146704 
000240 
000242 


L11 


142 
eeeeeee0e00e DOUBLE OPERAND TESTS seeeessesesaserers 


10$; 


118: 


PIRXXX: 
3 


16;45 PAGE 
ERROR +1 
CMP #340,R1 
BEQ 11$ 
ERROR + 
CLR CPEREG 
MOV SLOCOO,4 
MOV SLOCO1,.6 


RED ZONE TRAP TEST 


TEST PIRQ 
V 4 


° 
#1$,(SP)-+ 
4$ 


+1 
#0, (SP) 
S$ 


ol 
9124 ,CPEREG 
6$ 


+1 

CPEREG 
@STBOT,SP 
SLOCOO ,a04 
a0 

ave 


SLOCOO 


MO ‘ 

MOV OP TRQNX ,4 
CLR CPEREG 
TST aeP IRQ 
MOV SLOCOO,4 
BR PIRTEX 
ERROR el 


TEST PIRQ REGISTER DATA 
@ePIRQVEC ,SLOCOO 
aePTRQVEC +2,SL0CO1 
@UNXPTR , BOP TRQVEC 
oPR7, AYPIRQVEC +2 


MOV 
MOV 
MOV 
MOV 


sCPU ERROR 
sWAS PSW LOADED PROPERLY ON TRAP? 


3 
;CPU ERROR 
;CLEAR CPU ERROR REGISTER 
sRESTORE VECTOR 
: ” 


sSAVE VECTOR 
3SET UP VECTOR 


;SET UP THE STACK WITH ODD ADDRESS. 


;CLEAR THE CPU ERROR REGISTER 
;CLEAR THE PSW 
;ACCESS NON-EXISTANT I/0 ADDRESS 
;CPU ERROR 
3IS R6 CORRECT? 
;BRANCH IF YES 
;CPU ERROR 
3IS DATA AT ADDR O CORRECT? 
;BRANCH IF YES 
;CPU ERROR 
:IS PSW DATA IN ADDR 2 CORRECT? 
sBRANCH IF YES 
;CPU ERROR 
;IS CPU ERROR REGISTER CORRECT? 
;BRANCH IF YES 
;CPU ERROR 
;CLEAR CPU ERROR REGISTER 
sRESTORE STACK 
sRESTORE VECTOR 
sRESTORE ADDR O 
sRESTORE ADOR 2 


REGISTER RESPONSE 


sSAVE CONTENTS OF VECTORS 

;SETUP INTERRUPT VECTOR 

;CLEAR CPU ERROR REGISTER 

;LOOK FOR REPLY FROM PIRQ 

sRESTORE VECTORS 

sIF IT RESPONDS, CONTINUE TESTING. 

;ERROR! NO RESPONSE FROM PIRQ REG 
;CPU ERROR 


sSAVE PIRQ VECTORS 


SEQ 0141 


; ‘ 
;SET UP PIRQ VECTOR FOR UNEXPECTED INTERRUPT 
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012703 


012704 


000237 
005037 
023724 
001401 


104001 
010337 
023724 


001401 


000237 
005037 
012767 
012703 
012704 
010337 


023724 


001000 


034144 


177772 
177772 


177772 
177772 


177772 
000001 
177000 
034250 
177772 


177772 


002776 


000777 
002776 
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SORREHEEHEOED DOUBLE OPERAND TESTS she e4e466beesesees 


1$; 


2s: 


3$: 


PIRTBL: 


EXPIR1: 


PIRe: 
° 


1$: 


16:45 PAGE 
MOV #1000 ,R3 
MOV #PIRTBi.,R4 
SPL 7 
CLR BOP IRG 
CMP QOPIRG,CR4)+ 
BEQ es 
ERROR +l 
MOV R3,a0P IRQ 
CMP AYP IRG,CR4)-+ 
BEQ 3$ 
ERROR +1 
ASL R3 
BCC es 
BR EXPIR1 
-WORD O 
. WORD 1042 
. WORD 2104 
-WORD 4146 
. WORD 10210 
. WORD 20252 
-WORD 40314 
. WORD 100356 


sPUT 1000 IN R3: START TESTING 
;BITS IN PIR@ REG BY FLOATING 

3A BIT THROUGH BITS 9-15. 

;SET UP R4 AS A POINTER TO EXPECTED 
sENCODED PRIORITY LEVELS IN PIRTBL 
:00N'T ALLOW INTERRUPTS. 

;CLEAR OUT THE PIRG 

;IS PIRQ OK?? 

;BRANCH IF OK 

sERROR; PIRQ REG WAS NOT CLEAR 


;CPU ERROR 


;SET A BIT IN PIRQ REGISTER 
sCOMPARE THE ENCODED PRIORITY BITS 
;WITH DATA IN THE TABLE CPIRTBL ) 
;BRANCH IF ITS OK 

sERROR; ENCODED PRIORITY LEVELS ARE 
sNOT CORRECT 


;CPU ERROR 


sFLOAT A “1” THRU BITS 9-15 
3;IF CARRY BIT ISN’T SET, DO AGAIN. 
:GO TO EXIT TEST. 


TEST PIRG REGISTER LEVEL ENCODING 

f EPMA AESEEEEAEEADESESEEOEEOSEEREEDEEEAEEEESEEEEEEEEREREEREEEEES 
;THIS TEST IS TO CHECK THAT THE HIGHEST PRIORITY LEVEL SET IN THE 
;PROGRAM INTERRUPT REQUEST BITS IS REFLECTED IN THE ENCODED PROGRAM 
; INTERRUPT <1 BITS. 


a“PIRQ 
#1,FLAG 
#177000,R3 
oPITBL1,R4 
R3,a0PIRQ 


QHPIRQ,(CR4)+ 


;SHUT OFF INTERRUPTS 

;CLEAR PIRQ REGISTER 

;SETUP END OF LOOP SIGNAL 
;SET UP DESIRED PATTERN IN R3 
;SETUP R4& AS A TABLE POINTER 
3SET PATERN IN PIRQ REGISTER 


;COMPARE PATTERN IN PIRQ WITH PATTERN IN 
;EXPECTED PATTERN TABLE. 

;GO TO ERROR IF NOT THE SAME 

3IS THIS THE LAST TIME THROUGH?? 

sYES, IF FLAG IS ZERO 

;SHIFT PATTERN TO RIGHT FOR NEXT TES? 
;STRIP OFF BITS 8-0 

:IF R3 IS NOT = O GO DO THE NEXT PATTERN 
;CLR THE FLAG TO INDICATE LAST 


SEQ 0142 


Nil 
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7800 ;TIME THROUGH THE LOOP 
7801 034244 000761 BR 1$ :GO THROUGH LOOP ONCE MORE 
7802 sERROR; PATTERNS WERE NOT THE SAME 
ae 074246 104001 2s: ERROR +1 ;CPU ERROR 


7805 034250 177356 077314 037252 PITBLi: .WORD 177356,77314,37252,17210, 7146, 3104,1042,0 
7806 034256 017210 007146 003104 
7807 034264 001042 000000 


7808 ‘ 

7809 034270 UNXPIR: sUNEXPECTED PIRQ INTERRUPT 

tent 034270 104001 ERROR +1 ;CPU ERROR 

7812 034272 PIR2EX: 

7813 

7814 034272 PIRS: 

7815 ; TEST PIRQ@ INTERRUPTS 

7816 F EAAARAEEARAREEAAEAEEEAEAAAEEEEAEREEEREEADEESEEEOEEEESEREEEEEEOEREE 

7817 ” ;THIS TEST CHECKS THAT EACH PROGRAM INTERRUPT OCCURS PROPERLY 

7818 034272 012703 001000 MOV #1000 ,R3 sSETUP R3 AS A WORKING REGISTER 

7819 034276 012737 034342 000240 MOV oPIRRTN, BOPTROQVEC ;SET UP INTERRUPT ROUTINE AT PIR VECTOR 
7820 034304 012737 000340 000242 MOV #340 ,aePIRQVEC-2 ; = ,: >: ‘a 

7821 034312 005004 CLR R4 s INITIALIZE R4 AS EXPECTED DATA HOLDER. 
7622 034314 005724 PI: TST CR4)+ ; INCREMENT R4 BY 2 

7623 034316 050337 177772 BIS R5,QePIRQ ;SET PIRQ TO INTERRUPT 

7824 034322 000230 SPL 0 sENABLE INTERRUPT TO OCCUR 

7825 s;ERROR! INTERRUPT DID NOT OCCUR 

7826 034324 104001 ERROR +1 :CPU ERROR 

7827 sERROR! INTERRUPT OCCURRED IN WRONG SEQUENCE 
7828 034326 104001 PIe: ERROR +1 ;CPU ERROR 

7829 034330 062706 000004 PIS: ADD @4,SP ;CLEAN UP THE STACK 

7830 034334 006303 ASL R3 ;SHIFT R3 TO LEFT FOR NEXT INTERRUPT 
7631 034336 103366 Bcc PIl sEND IF CARRY BIT IS SET 

ronk 034340 000412 BR PIR3EX ;ON TO THE NEXT TEST 

7834 034342 013705 177772 PIRRTN: MOV doPIRG,RS sMOVE THE CONTENTS OF PIRQ REG TO RS 
7835 034346 005037 177772 CLR QeP IRQ sKILL PIRQ INTERRUPT. 

7836 034352 042705 177761 BIC #177761,R5 sMASK OFF ALL BITS EXCEPT 1-4. 

7837 034356 020405 CMP R4,R5 ;0I0 THE CORRECT LEVEL INTERRUPT OCCUR? 
7838 034360 001362 . BNE PI2 :IF NOT; GO TO ERROR. 

7839 034362 000167 177742 JMP PI3 sRETURN FROM SUCCESSFUL INTERRUPT GET 
aan ‘. sREADY FOR THE NEXT ONE. 

7842 034366 PIR3SEX: 

7843 

7844 

7845 034366 PIR4: 

7846 3 TEST PIRQ VS PSW INTERRUPT LEVEL 

7847 FOP EESERESEEAEEEEEEEEAEEHORESEEEESEESEEOSEREEEEEEEEEEEEEEEE 

7848 sTHIS TEST IS TO ENSURE THAT PIRQ CANNOT INTERRUPT WHEN PSW INTERRUPT 

7849 sLEVEL IS SET TO BLOCK THEM OUT. 

7850 034366 005037 177772 CLR @OP IRQ ;CLEAR THE PIRQ 

7851 034372 005037 177776 CLR aoPsw ;CLEAR THE PSw. 

7852 034376 000237 SPL ? ; LOCK INTERRUPTS FROM BEING SERVICED. 
7853 034400 012703 001000 MOV #1000 ,R3 sUSE R3 AS A WORKING REGISTER, 

7854 034404 01273/ 034436 000240 MOV 92%, Q@PIRQVEC sSETUP INTERRUPT VECTORS 


7855 034412 012737 000340 000242 MOV #340 ,aePTRQVEC +2 i 
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010337 
006303 


103374 
005037 
000408 


005037 
104001 


005724 
010337 


013701 
013702 
042701 
042702 
020102 
002001 


104001 
006303 


103360 
005337 
001350 
000167 


015746 
005037 
016601 
011402 


177772 


177772 


177772 


177772 
034562 
000340 
034640 
000006 
001000 
143266 
177772 
177776 
177772 


177437 
177437 


110500 
000072 


177772 
177772 
000004 


000240 
000242 


110500 
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1$; MOV R3,a0PIRG sSET INTERRUPT LEVEL IN PIRQ. 
ASL R3 sSHIFT A “1” LEFT TO INCREASE INTERRUPT 
sPRIORITY LEVEL. 
BCC 1$ sIF C BIT NOT SET THEN DO IT AGAIN. 
CLR Q@OPTRO sELSE CLEAR THE PIRG 
BR 3$ sExXIT TEST. 
es: CLR aoP IRQ sSTOP PIRQ FROM INTERRUPTING. 
sERROR! NO INTERRUPTS SHOULD OCCUR. 
; ERROR ol ;CPU ERROR 
3$; 
PIRS: 
3 TEST PIRQ INTERRUPTS OCCUR AT PROPER LEVEL 


FEOPMAHCOOESEAEEESEEEEOEEEE OOO OOOOEHEEEEEEEREEEEOEEEEEOEEOEEEEOE 
sTHIS TEST ENSURES THAT INTERRUPTS OCCUR AT THE PROPER LEVEL 
sTHE PRIORITY LEVEL IS INITIALLY SET TO PRI6, THE PIRQ THEN STARTS INTERRUPTING 
sAT PRI1. NO INTERRUPTS SHOULD OCCUR UNTIL THE INTERRUPTING LEVEL EXCEEDS THE 
sPRIORITY LEVEL IN THE PSW. AFTER EACH LEVEL OF INTERRUPT HAS BEEN TRIED; THE 
sPSW PRIORITY LEVEL IS LOWERED ONE NOTCH, AND THE CYCLE REPEATS UNTIL PSw 
sPRIORITY LEVEL O IS REACHED. INTERRUPTS AT PSw PRIORITY LEVEL O HAVE BEEN DONE 
sPREVIOUSLY. 

CLR aeP IRQ sCLR THE PIRQ 

MOV 108 ,BOPIRQVEC sSET UP INTERRUPT VECTORS 


MOV OPR7 ,SIPIRQVEC +2 3 
MOV OPITBL2,RS sSETUP RS AS A TABLE POINTER. 
MOV 06, 30DCOUNT s INIT LOCATION OCOUNT: 
18: CLR R4 sINITIALIZE R& AS A COUNTER, 
MOV #1000,R3 sUSE R3 AS A WORKING REGISTER. 
MOV (R5)+,PS sMOVE PRIORITY LEVEL TO PSw 
3$; 1ST (R4)> s INCREMENT R4 BY 2 
MOV R3,90PIRQ 3SET INTERRUPT LEVEL IN PIRQ. 
peeeeeeeINTERRUPTS WILL HAPPEN HERE coccecces 
MOV @oPs,Ri sSAVE PS IN R1 a * EXECUTED 
MOV aoPIRa, Re sSAVE PIRQ IN R2 H NO 
BIC 0177437, Ri sCLEAR EXTRANEOUS BITS : intenmet 
BIC 01774387.R2 3 : HAS 
CMP R1,R2 3R1 SHOULD BE >= Re H OCCURRED 
BGE 43% sIF IT IS GO ON §-.--- 
sERROR! SHOULD HAVE INTERRUPTED. 
ERROR ol ;COu ERROR 
43; ASL. R3 sSHIFT A “1” LEFT UNTIL INTERRUPT LEVEL 
3IS REACHED. 
BCC 3$ ;BRANCH BACK IF CARRY IS NOT SET. 
NEC @eDCOUNT s;LOWER INTERRUPT PRIORITY LEVEI 
BNE 1$ 3IF OCOUNT: O , WE'RE DONE. 
JMP PIRSEx 3JUMP TO END OF TmIS TEST. 


sPTRQ INTERRUPT SERVICE ROUTINE 
‘ 


108; MOV @OPIRQ, (SP) sSAVE PIRQ DATA ON STACK 
CLR @OPTROQ soMuUT OFF PIRQ INTERRUPTS 
MOV 4(5P),R1 sGET OLD PSW. SAVE IN RAL. 


MOV (SP ),R2 suk T PTRQ FROM STACK, 


SEQ 9144 
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034630 
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042702 
042701 
020102 
100401 


104001 
012602 
042702 
020402 
001401 


005037 
000237 
012737 
012737 
012703 
010337 
012704 
000230 


005 704 


001417 


104001 
013702 
042702 


MACYLI $0( 1046) 


16:45 


177438” 
177487 


177761 


034544 


177772 


034722 
000340 
177000 
177772 
000016 


177772 
177761 


000240 
000242 


o! 

t 
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BIC 0177437,Re2 sCLEAR UNWANTED BITS FROM RO 

BIC 0177437,R1 sCLEAR UNWANTED BITS FROM R1 

CMP R1,R2 sR2 SHOULD BE >» Ril. 

BMI 20$ 3GO CHECK SEQUENCE OF INTERRUPT. 
sERROR! PRIORITY OF INTERRUPT WAS NOT 
sHIGH ENOUGH. SHOULDN'T HAVE OCCURRED. 

ERROR ol sCPU ERROR 

208: MOV (SP )+,R2 sPOP OLD PIRQ OFF THE STACK, 

BIC 177761,R2 sCLEAR OFF EXTRANEOUS BITS. 

CMP R4,Re sSHOULD BE EQUAL. 

BEQ els sIF THEY ARE EQUAL, CLEAN UP STACK AND 
tate FOR THE NEXT INTERRUPT 
sEL 
sERROR! INTERRUPT OCCURRED OUT OF SEQUENCE. 

ERROR ol ;CPU ERROR 

els: MOV 043,(S5P) sPUT RETURN ADDRESS ON THE STACK. 
RTI sRETURN FROM INTERRUPT, RESTORE PSw. 
PITBL2: .WORD 300 sPRIORITY LEVEL 6 

WORD 240 sPRIORITY LEVEL 5 

«WORD 200 sPRIORITY LEVEL 4 

. WORD 140 sPRIORITY LEVEL 3 

. WORD 100 sPRIORITY LEVEL 2 

WORD 40 sPRIORITY LEVEL 1 

PIRSEX: 
PIR6: 
: TEST THAT PIRQS ARE SERVICED IN CORRECT ORDER 


FEOCOAHEOOEEEEOEEEEEEEEEEEEEEOEEEEESEEEOEEEEEEEREEEHEOREEEEEEEEES 

sTHIS TEST CHECKS THAT ALL PIRQ INTERRUPTS ARE SERVICED 

3IN THE CORRECT DECENDING ORDER. I.E. IRQ6 IS NOT SERVICED 

sBEFORE IRQ7 ETC. THE PIRQ IS LOADED WITH ALL INTERRUPTS SIMUL TANEOUS: 1 

sTURNED ON. THE PSW PRIORITY LEVEL IS THEN LOWERED TO 0. EACH INTERRUPT 
;SHOULD BE SERVICED IN DECENDING ORDER. EACH TIME AN INTERRUPT OCCURRS, THE PSwW 
3IS LOADED WITH PRIORITY LEVEL 7? WHICH STOPS THE PIRQ FROM FURTHER INTERRUPTS, 
sAFTER A CORRECT INTERRUPT, AN RTI IS EXECUTED, AND THE PSwW PRIORIT: LEVEL 
sRETRUNS TO ZERO ALLOWING THE NEXT LOWER INTERRUPT TO OCCUR 


CLR @eP IRQ sCLEAR OUT THE PIRG 
SPL 7? 3NO INTERRUPTS WILL BE SERVICED. 
MOV 0108 ,aOPIRQVEC sSET UP VECTORS 
MOV OPR?, aOPIRQVEC +2 3 
MOV @177000,R3 sSETUP DESIRED PATTERN IN RS 
MOV R3, HOP IRG sMOVE PATTERN IN R3 TO PIRQ, 
MOV ot R4 sPRELOAD R4 AS A DECREMENTING COUNTER. 
SPL sLET THE PIRQ INTERRUPT 
santnane Relnenrs OCCUR HERE PP Pecccccecccscccenccs 
TST Ra 31S R& ZERO? LT SHOULD BE. THIS 


s INSTRUCTION SHOULON T BE EXECUTED 
sUNTIL ALL INTERRUPTS HAVE OCCURRED, 


BEG PIRGE X 3GO TO NEXT TEST, 
sERROR! ALL INTERRUPTS DIO NOT OCCLR 
ERROR el ;CPU ERROR 
108; MOV QOPIRQ,RE sSAVE THE PIRQ IN RO 


BIC 0177761,R.’ soTRIP OFF EXTRANEOUS BITs, 


SEQ 0145 


COKDABO KOULL 8 CLUSTER AACY11 4001046) 


COKDAB.P 11 


*968 
7269 
7970 
7971 
7972 


034732 
034734 


034736 
034740 
034742 
034744 
034750 
034754 


O23 7°56 
034764 


035152 


20402 
001401 


104001 
005744 
006003 
042703 
010337 
000002 


016737 
016737 


012700 
005020 
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000777 
177772 


146000 
145774 


142770 
177572 
002776 


000004 
133302 
177572 


142704 
177572 
002776 
000244 
000246 
000004 
000246 
000002 
133302 
172200 
172400 


177600 


000240 
000242 


000004 


000244 
000246 
000004 


Die 
05 APR : ; 
sekeneaenoes te ‘ Le OPE RANG TESTS s0eeeseseeeseeees 


SEQ 01464, 


CMP R4,R2 sSHOULD BE EQUAL. 
BEQ 15$ sSETUP FOR NEXT INTERRUPT, 
sERROR! INTERRUPT WAS SERVICED OUT OF ORDER 
ERROR *l sCPU ERROR 
15$; TST -(R4) sDECREMENT R4 Br 2 
ROR R3 sCHANGE PATTERN IN R3; LOWER INTERRUPT PRIORITY 
BIC 0777,R3 sSTRIP OFF UNNEEDED BITS 
Yt R3,a0PIRQ sLOWER INTERRUPT PRIORITY LEVEL. 
‘ 
PIR6EX: MOV SLOCOO , BOP TRQVEC sRESTORE VECTORS 
MOV SLOCO1,@OP IRQVEC +2 ; 2s 
é 
-SBTTL MEMORY MANAGEMENT TESTS 


FOMHSHHNHSAASEHSSESHOHEHEHASASEEEHEEEHEEEESEAOHEEEAEHEHEEEEEEEHEEEEHHEEEEECEEHESESESE 
FOSCSAHSASSHESHEHESEEEEHESESEESHEEAEHEEAEEEEHESHOEAEHESEEHEEEEHEEEHESEHRESEHEESEOEEEEOEOSE 
; BEGIN MMU TESTING 

FASASASHHSHASHASHSEHSHSEASASEHEHHEEEHSEESEEHEEEHEASHEHHEEHREEEEEEEEHEHESCOEEERESEEOOEEEE 
FESSHHSHSHHEHASESHESEHESASEHSSEESHSEESHEEEEEHEEEEHEEAEHEEEASEHHEEECEHOHEEEOEEEEES 


TSMMUL: 
3 STATUS REGISTER TEST 
CLR CPEREG ;CLEAR CPU ERROR REGISTER 
CLR 80177572 3 TURN MMU OFF 
CLR QF LAG ;CLEAR MMU TRAP FLAG 
MOV ao4,-(SP) sSAVE OLD VECTOR 
MOV MADDTRP , 204 s;SETUP NEW VECTOR 
CLR RS ;CLEAR FLAG 
MOV Q0177572,R1 : TEST MMRO 
MOV 80177574,R1 3; TEST MMRI 
MOV 80177576,R1 3; TEST MMRO 
MOV 80172516,R1 3s TEST MMR3 
MOV (SP )+ 204 sRESTORE VECTOR 
CMP RS,?0 ;0ID WE TRAP 
BEQ 1$ 3NO, THEN BRANCH 
ERROR 2 sMMU ERROR 
3YES, GO TO ERROR 
1$; 
TSMMU2: 
: ADDRESS TEST OF PARS,PDRS, AND FP REGS 
CLR CPEREG sCLEAR CPU ERROR REGISTER 
CLR 80177572 3MMU OFF 
CLR @OF LAG ;CLEAR MMU TRAP FLAG 
MOV 80244, -( SP) ;SAVE FP VECTOR 
MOV 6246, -( SP) 
MOV aed, -( SP) sSAVE TIME OUT VECTOR 
MOV 0246 ,80244 ;SETUP NEW FP VECTOR 
MOV $2,90246 : 
MOV GADDTRP , 204 sSETUP NEW TIME OUT VECTOR 
CLR RS sCLEAR TIMEOUT FLAG 
MOV #172200,RO sLOAD ALL PARS AND PDRS WITH ZERO 
1$: CLR (RO)>+ 3 
CMP RO, #172400 3 
BNE 1$ H 
MOV 0177600,RO 3 
2s: CLR (RO)> ; 


COKDABO KNJ11 B we tees 


COKDAB.P11 


035154 
035160 
035162 
035166 


035242 


035244 
035250 
035252 


035254 
035260 
035264 
035266 
035272 
035276 
035300 


035302 
035304 
035306 
035312 
035314 
035320 
035322 
035326 
035332 
035334 


035336 
035340 


035366 
035372 


05 - AP 


021427 
001401 
104002 


012704 
012701 
010102 
072227 
021427 
001401 
104002 


010224 


005201 


022327 


MACY11 3061046) 05-APR-84 
84 16:45 


177700 


000200 
003012 


003012 


003022 
003022 
000004 


035222 


172200 
000001 


000010 
000000 


t | ¢ 
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MEMORY MANAGEMENT TESTS 


3$;: 


els: 


223: 


4$; 


5$: 


6$: 


7$; 


Bs: 


RO, #177700 
es 


(R4)+, 04 
21s 
“2 


(RO), 03% 
228 
+2 


#172200,R4 
@1,R1 
R1,Re2 
#10,R2 
(R4),90 

5$ 

+2 


R2,(R4)> 
R1 
R4,%172400 
4$ 


0177600,R4 
R1,R2 
910,R2 
(R4),00 

7$ 

+2 
R2,(R4)+ 

R 


1 
R4,0177700 
6$ 
OFLO,R4 
OFLOAT R353 
ACO,(R4) 
AcS,ACO 
ACO,(R3) 
04 ,R2 
CR3)+, 00 


LOAD ACO-ACS WITH O 


sLOAD FEC WITH 4 AND FEA WITH o3$ 
sCHECK FEC FOR 4 AND FEA FOR 235 
: 


; 

sMMU ERROR 
H 
: 


; 
;MMU ERROR 


sCHECK EACH PAR, POR FOR O THEN 
sWRITE A UNIQUE NUMBER TO IT 
3 
3 
é 


3 
;MMU ERROR 


CHECK ACS FOR ALL ZEROES THEN LOAD Ao 


SEQ 0147 


COKDABO KDU11 6 


COKDAB.P11 


035376 
035400 


035402 
035404 


035532 
035534 
035536 
035542 
035544 
035550 
035554 
035556 
035562 
035564 


035566 
035570 
035572 
035576 
035600 
035604 
035610 


CLUSTER 
. 84 


OS -APR 


001401 
104002 


005302 
001372 
012703 
012713 
172413 
174005 
172404 
174013 


174314 


MACY1L1 30( 1046) 
16:45 


003012 
000006 


003012 


003022 
000004 


003022 
000004 


003022 


OS APR -84 


MEMORY MANAGEMENT TESTS 


9$; 


108: 


12$: 


13$: 


14$: 


158: 


168: 


17$; 


93 
+2 


R2 

8$ 
OFLOAT,RS 
06,(R3) 
(R3),ACO 
ACO,ACS 
AC4 ,ACO 
ACO,(R3) 
#4 ,R2 
(R3)+, 40 
11$ 

“2 


Re 

10$ 
FLOAT ,R3 
#5,(R3) 
(R3),ACO 
ACO,AC4 
04 ,R2 
(R4)+, 40 
13$ 

“2 


Ro 

les 
#1,(R3) 
(R3),ACO 
#FLO,R4 
#4,R2 
AC1,(R4) 
CR4)+, #0 
15$ 

+2 


R2 

14$ 
#2,(R3) 
(R3),AC1 
GFLO,R4 
04 ,R2 
AC2],(R4) 
(RG )+, 90 
17$ 

+2 


R2 

16$ 
#3,(R3) 
(R3),AC2 
oFLO,R4 
4,R2 
AC3S,(R4) 


Fle 


16:45 PAGE 149 


Y 
sCHECK ACE FOR ALL 
Hy 


CHECK ACO FOR ALL 


CHECK ACiL FOR ALL 


CHECK AC2 FOR ALL 


ZEROES 


ZEROES 


ZEROES 


ZEROES 


CHECK AC4 FOR ALL ZEROES THEN LOAD A 5 


THEN LOAD A 1 


THEN LOAD A 2 


THEN LOAD A 3 


THEN LOAD Aa 


SEQ 0144 


COKDABO KDNJ11 B CLUSTER MACY11 40( 1046) 


COKDAB.P 11 


8136 
8137 
8138 
8139 
8140 
8141 
8142 
8143 


035702 
035704 
035710 
035712 
035716 
035720 
035724 
035726 
035730 


035732 
035734 
035740 
035742 
035746 
035752 
035754 
035756 
035760 
035764 
035766 


035770 
035774 


05 -APR-84 16:45 


022427 
001401 
104002 


005302 
001372 
012713 
172713 
012704 
170214 
022714 
001401 
104002 


170127 
012704 
012701 
010102 
072227 
022402 


012703 
022127 
001401 
104002 


005303 
001372 
012701 
172404 
174011 
022127 


000000 


000003 
000000 


003012 


000005 


05 - APR -84 


Gl 
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MEMORY MANAGEMENT TESTS 


18%: 


198; 


208: 


23s: 


24s: 


253%: 


263: 


27s; 
28s: 


29%: 


(R4)+, 00 
19$ 
+2 


4 
#100204 ,(R4) 
_ 


#200 
#172200,R4 
#1,R1 
R1,R2 
#10,R2 
(R4)+,R2 
24s 

+2 


R1 

R4, 0172400 
23s 
#177600,R4 
R1,R2 
#10,R2 
(R4)+,R2 
263 

+2 


R1 
R4,9177700 


a 
3CHECK PDR, PAR FOR UNIQUE NUMBERS 


i 
; 
H 
3 
; 
sMMU ERROR 
; 


Pe OS 


sMMU ERR 


CHECK ACS FOR a6 


e+ ef of ef oF ee GF oe OF oF 


‘ 
3 
sCHECK AC4 FOR #5 


SEQ 0149 


COKDABO KDI1L B CLUSTER MACY11 80( 1046) 


COKDAB.P LI 


8192 
8193 
8194 
8195 
8196 
8197 


036024 
036026 


036030 
036034 


036074 
036076 


001401 
104002 


012703 
022127 
001401 
104002 


005303 
001372 
022427 
001401 
104002 


012703 
022427 
001401 
104002 


005303 
001372 
012701 
174111 
022127 
001401 
104002 


012703 
022127 
001401 
104002 


005303 
001372 
012701 
174211 
022127 
001401 
104002 


012703 
022127 
001401 
104002 


005303 
001372 
012701 
174311 
022127 
001401 
104002 


012703 
022127 
001401 


O5-APR-84 16:45 


000003 


003012 
000002 


000003 


000003 
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MEMORY MANAGEMENT TESTS . 


308: 
31$: 


328: 


333; 
348; 


35%: 


36$: 
37$: 


38S: 


3983: 
40$: 


4l1$: 


42%: 
43%: 


BEQ 
ERROR 


MOV 
CMP 


30$ 
+2 


#3,R3 
(R1)+, 90 
32$ 

+2 


OFLOAT,R1 
AC1,(R1) 
(R1)+,@2 
36% 


+2 


03,R3 
(R1)+, 90 
38$ 

+2 


R3 

37$ 
oFLOAT,R1 
AC2,(R1) 
CR1)+,%3 
39$ 

+2 


93,R3 
(R1)+, a0 
41s 

2 


R3 
40$ 
#FLOAT,R1 
AC3,(R1) 
CR1L)+, 04 
42s 
+2 


#3,R3 
(R1)+, #0 
44s 


Mle 


16:45 PAGE 151 


; 
ERROR 


3 
3 
3 
ERROR 
; 
PF 
sCHECK ACO FOR #1 
3 
ERROR 


F 
3 
3 
ERROR 
F 
3 
sCHECK AC1 FOR #2 
3 
F 
; 
ERROR 


; 
; 
i 
ERROR 
; 
sCHECK AC2 FOR #3 
; 
. 
; 
ERROR 


3 
;CHECK ACS FOR 24 


3 
3 
ERROR 


; 
‘ 
3 


SEG 0150 


COKDABO KDJL1 
COKDAB.P11 


036242 
036246 


B CLUSTER 


05 - 


104002 


005303 
001372 
020527 
001401 
104002 


012637 
012637 
012637 


005037 
005037 
012703 
012723 
020327 
001373 
012703 
012723 
020327 
001373 
012703 
022327 
001401 
104002 


020327 
001371 
022327 
001401 
104002 


020327 
001371 
022327 
001401 
104002 


020327 
001371 
022327 
001401 
104002 


020327 
001371 
012703 
022327 
001401 
104002 


020327 
001371 


MACY11 30( 1046) 
APR -84 16:45 


000000 


000004 
000246 
000244 


177572 
002776 
172200 
177777 
172400 
177600 
177777 
177700 


172200 
177416 


172240 
177777 


172300 
177416 


172340 
177777 


172400 


177600 
177416 


177640 


[le 


;MMU ERROR 
3 
$ 


é 
:IS TIME OUT FLAG O 
:YES GO ON 
;MMU ERROR 
sNO GO TO ERROR 
sRESTORE TIME OUT VECTOR 
sRESTORE FP VECTOR 
; : 


Se ALL PARS/PDRS WITH ONES THEN ZEROS 


OS-APR-84 16:45 PAGE 152 
MEMORY MANAGEMENT TESTS 
ERROR +2 
443; DEC R3 
, BNE 43$ 
CMP RS,¢0 
BEQ 45$ 
ERROR +2 
4S$: MOV (SP )+,ae4 
MOV (SP)+,a#246 
MOV (SP )+,a%244 
TSMMU3: 
; 
84177572 
CLR @OFLAG 
MOV #172200,R3 
1$: MOV #177777,(R3)-+ 
CMP R3,%172400 
BNE 1$ 
MOV #177600,R3 
2s: MOV 9177777,(R3)-> 
CMP R3,%177700 
BNE 2s 
MOV #172200,R3 
3$: CMP (R3)+,%177416 
BEQ 4$ 
ER. IR *2 
4s CMP a” #172240 
BNE 
5$: CMP cR3)>, #177777 
BEQ 6$ 
ERROR +2 
6$: CMP R3,%172300 
BNE 5$ 
7$: cmp (R3)+, 9177416 
BEQ 8s 
ERROR +2 
8S: CMP R3,%172340 
BNE 7$ ; 
9$: CMP (R3)+,9177777 
BEQ 10$ 
ERROR +2 
10$: CMP R3,%172400 
BNE 9$ 
MOV #177600,R3 
118: CMP (R3)+, 0177416 
BEQ 12s 
ERROR +2 
12%: CMP R3,%177640 
BNE 11$ 


sMMU OFF 

;CLEAR MMU ABORT FLAG 

;LOAD ALL PARS AND PDORS WITH ONES 
: 


CHECK SPORS FOR ONES 


;MMU ERROR 
Hy 
o 


é 
sCHECK SPARS FOR ONES 


é 
sMMU ERROR 
é 

‘ 


G 
s;CHECK KPDRS FOR ONES 


3 
3MMU ERROR 
H 

Hy 


3 
sCHECK KPARS FOR ONES 


5 
sMMU ERROR 
i 

3 


; 
sCHECK UPDRS FOR ONES 
; 


$ 
;MMU ERROR 


SEQ O151 


COKDABO KDJ11 B CLUSTER 
COKDAB.P11 - 


O5 -APR -84 


022327 
001401 
104002 


020327 
001371 
012703 
012723 
020327 
001373 
012703 
012723 
020327 
001373 
012703 
022327 
001401 
104002 


020327 
001371 
012703 
022327 
001401 
104002 


020327 
001371 


012720 


MACY11L 30( 1046) 
16:45 


177777 


177700 
172200 
000000 
172400 
177600 
000000 
177700 
172200 
000000 


172400 


177600 
000000 


177700 


177572 
144210 
172200 
052404 
125012 
172240 


125252 
052525 
172300 


052404 
125012 
172340 


125252 
052525 
172400 


177600 
052404 
125012 
177640 


125252 


05 - APR - 84 


oJ le 


16:45 PAGE 155 


MEMORY MANAGEMENT TESTS 


13$: 


14$;: 


15$: 


16$: 


17$: 


1$; 


2s: 


3$; 


4s: 


S$: 


6$: 


(R3)¢,4177777 
14$ 
+2 


R3,0177700 
13$ 
#172200,R3 


#177600,R3 
#0,(R3)-> 
R3,#177700 


16$ 
#172200,R3 
(R3)+, 00 
18$ 

+2 


R3, #172400 
17$ 


#177600,R3 
(R3)+,%0 
20$ 

+2 


R3,9177700 
19$ 


;CHECK UPARS FOR ONES 


° 
;MMU ERROR 


5 
;LOAD ALL PARS AND PDRS WITH ZEROES 


; 
sMMU ERROR 
; 


TEST FOR ADJACENT SHORTS IN PARS/PORS 


CLR 


8177572 
FLAG 
#172200,RO0 
#52404 ,(RO)>+ 
#125012,(RO)>+ 
RO, #172240 , 


1$ 

#125252, (RO)>+ 
#52525, (RO)-+ 
oe 


$ 
#52404 ,(RO)>+ 
#125012,(RO)-+ 
iia 
3$ 
#125252, (RO)+ 
#52525,(RO)> 
> laa 
4 


#177600,RO 
#52404 ,(RO)>+ 
#125012,(RO)>+ 
RO, #177640 


S$ 
#125252, (RO)-+ 


sMMU OFF 


;CLEAR MMU ABORT 


sLOAD SPORS 
‘ 


LOAD SPARS 
LOAD KPORS 
LOAD KPARS 
LOAD UPDRS 


LOAD UPARS 


WITH 


WITH 


WITH 


WITH 


WITH 


WITH 


FLAG 
ALTERNATING 


ALTERNATING 


ALTERNATING 


AL TERNAT ING 


ALTERNATING 


ALTERNATING 


CHECK ALL PARS AND PDRS FOR ZEROES 


PATTERN 


PATTERN 
PATTERN 
PATTERN 


PATTERN 


PATTERN 


SEQ 0152 


COKDABO KDJ11-B8 CLUSTER 


COKDAB.P11 


037010 


037012 
037016 
037020 


037022 
037026 
037030 
037034 
037036 


037040 
037044 
037046 


037050 
037054 
037056 
037062 
037066 
037070 


037072 
037076 
037100 


037102 
037106 


O05 - APR -84 


012720 


012703 
022327 
001401 
104002 


022327 
001401 
104002 


020327 


022327 
001401 
104002 


020327 


022327 
001401 
104002 


020327 
001365 


MACY11 30( 1046) 
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052525 
177700 


172200 


052404 


125012 


172240 
125252 


052525 


172300 
052404 


125012 


172340 
125252 


052525 


172400 


177600 
052404 


125012 


177640 


05 - APR -84 


14$: 


15$: 
168: 


17$: 


18$: 


19$: 


208: 


218; 


16:45 PAGE 154 
MEMORY MANAGEMENT TESTS 

MOV #52525,(RO)+ 
CMP RO, #177700 
BNE 6$ 
MOV #172200,R3 
CMP (R3)+, 052404 
BEQ 8$ 
ERROR +2 
CMP CR3)+, 4125012 
BEQ 9$ 
ERROR +2 
CMP R3,0172240 
BNE 7$ 
CMP (R3)+, 125252 
BEQ 11$ 
ERROR +2 
CMP (R3)+, 852525 
BEQ 12$ 
ERROR +2 
CMP R3,%172300 
BNE 10$ 
CMP (R3)+, #52404 
BEQ 14$ 
ERROR +2 
CMP (R3)+,#125012 
BEQ 15$ 
ERROR +2 
CMP R3,%172340 
BNE 13$ 
CMP (R3)+, 4125252 
BEQ 17$ 
ERROR +2 
CMP €R3)+, #52525 
BEQ 18$ 
ERROR +2 
CMP R3,#172400 
BNE 16$ 
MOV #177600,R3 
CMP (R3)+, #52404 
BEQ 20$ 
ERROR +2 
CMP (R3)+, #125012 
BEQ 21$ 
ERROR +2 
CMP R3,%#177640 
BNE 19$ 


K1e 


sCHECK SPDRS 
; 


; 
ERROR 
3 
3 
ERROR 
F 
; 
;CHECK SPARS 
3 
ERROR 
; 
3 
ERROR 
: 
: 
;CHECK KPDRS 
; 
ERROR 


a 
ERROR 


CHECK KPARS 


ERROR 
; 
; 

ERROR 
; 


; 
3;CHECK UPDRS 
; 


; 
ERROR 

; 

; 
ERROR 


SEQ 0153 


COKDABO KDJ11 B CLUSTER 
COKDAB.P11 


037110 
037114 
037116 


037120 
037124 
037126 


037130 
037134 


037136 
037142 
037146 
037152 
037156 
037160 
037164 
037170 
037174 
037176 
037202 
037206 
037212 
037214 
037220 
037224 
037230 
037232 


037270 


037272 
037276 
037302 
037304 


037306 
037312 
037314 


037316 
037322 
037324 
037330 
037332 


037334 
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022327 
001401 
104002 


022327 
001401 
104002 


020327 
001365 


012700 
012720 
012720 
020027 
001371 
012720 
012720 
020027 
001371 
012720 
012720 
020027 
001371 
012720 
012720 
020027 
001371 
012700 
012720 
012720 
020027 
001371 
012720 
012720 
020027 
001371 


012703 
022327 
001401 
104002 


022327 
001401 
104002 


020327 
001365 
022327 
001401 
104002 


022327 


MACY11 30( 1046) 


16:45 
125252 


052525 


177700 


172200 
125012 
052404 
172240 


oS2525 
125252 
172300 


125012 
052404 
172340 


052525 
125252 
172400 
177600 
125012 
052404 
177640 
052525 


125252 
177700 


172200 


125012 


052404 


172240 
052525 


125252 


05 - APR - 84 


L1e2 


16:45 PAGE 155 


MEMORY MANAGEMENT TESTS 


22s: CMP 
BEQ 
ERROR 


23%: CMP 
BEQ 
ERROR 


24s: CMP 
BNE 


C(R3)+, #125252 
23$ 

+2 

C(R3)+, #52525 
243 

+2 

R3,%177700 
22$ 


; 
sREVERSE ALTERNATING PATTERN 
° 


258: MOV 
263: MOV 
27s: MOV 


28s: MOV 


35$: CMP 


#172200,RO 
#125012,(RO)> 
#52404 ,(RO)-+ 
RO, #172240 
25$ 
#S2525,(RO)> 
#125252, (RO)+ 
RO, #172300 
26% 
#125012,(RO)+ 
#52404 ,(RO)+ 
RO,#172340 
27s 
#52525,(RO)+ 
#125252, (RO)-+ 
RO, #172400 
28s 
#177600,RO 
#125012,(RO)> 
#52404 ,(RO)> 
RO, #177640 
29% 

#52525, (RO)-+ 
#125252, (RO)>+ 
RO, #177700 
30$ 


#172200,R3 
(R3)+,%125012 
32$ 

+2 

(R3)+, #52404 
33$ 

+2 

R3,%172240 
31$ 

(R3)+, #52525 
35$ 

+2 

CR3)+, #125252 


sCHECK UPARS 


3 
sMMU ERROR 


i 
sMMU ERROR 


sLOAD SPORS 


é 
sLOAD SPARS 
LOAD KPDRS 


;LOAD KPARS 


= 
° 
p= 
o 


UPDRS 


° 
5 


UPARS 


;CHECK SPORS 
3 


;MMU ERROR 


i 
sMMU ERROR 


3 
é 
sCHECK SPARS 


‘ 
sMMU ERROR 


REVERSE 


REVERSE 


REVERSE 


REVERSE 


REVERSE 


_ REVERSE 


PATTERN 


PATTERN 


PATTERN 


PATTERN 


PATTERN 


PATTERN 


SEG 0154 


COKDABO KNJ11-8 CLUSTER 
COKDAB.P11 05 - APR -84 


8472 
8473 
8474 
8475 


037340 
037342 


037344 
037350 
037352 
037356 
037360 


037362 
037366 
037370 


037372 
037376 
037400 
037404 
037406 


037410 
037414 
037416 


037420 
037424 
037426 
037432 
037436 
037440 


037442 
037446 
037450 


037452 
037456 
037460 
037464 
037466 


037470 
037474 
037476 


037500 
037504 


037506 


037506 
037514 
037520 
037524 
037530 
037534 
037536 


022327 
001401 
104002 


020327 


022327 
001401 
104002 


020327 
oc" 365 


022327 
001401 
104002 


020327 
001365 
022327 
001401 
104002 


022327 
001401 
104002 


020327 
001365 


012737 


MACY11 30( 1046) 
16:45 


172300 
125012 


052404 


172340 
052525 


125252 


172400 


177600 
125012 


052404 


177640 
052525 


125252 


177700 


160000 
143256 
177572 
000176 
160000 


177572 


05 - APR -84 
ME 


36$: 
373: 


388: 


39%; 
40$: 


41$: 


423: 


43%: 


44$: 


45$: 
463: 


47%: 


48%: 


TSMMUS : 


16:45 PAGE 156 

MORY MANAGEMENT TESTS 

BEQ 36$ 

ERROR +2 

CmP R3,4#172300 

BNE 34$ 

CMP (R3)+, #125012 

BEG 38$ 

ERROR +2 

CMP CR3)+, #52404 

BEQ 39$ 

ERROR +2 

CMP R3,%172340 

BNE 37$ 

CMP (R3)+, #52525 

BEQ 41$ 

ERROR +2 

CMP (R3)+, #125252 

BEQ 42$ 

ERROR +2 

CMP R3,%0172400 

BNE 40$ 

MOV #177600,R3 

CMP (R3)+, #125012 

BEQ 44$ 

ERROR +2 

CMP CR3)+, 052404 

BEQ 45$ 

ERROR +2 

CMP R3,%177640 

BNE 43$ 

CMP (R3)+, #52525 

BEQ 47$ 

ERROR +2 

CMP (R3)+, #125252 

BEQ 48$ 

ERROR +2 

CMP R3,%177700 

BNE 46$ 

TEST MMRO ABORT BITS 

MOV #160000 ,80177572 

CLR FLAG 

MOV @#SRO,RO 

BIC #176,RO 

CMP RO, #160000 

BEQ 1$ 

ERROR +2 


Mle 


3;MMU 


; 
ERROR 
: 
: 
;CHECK KPDRS 
; 
ERROR 
F 
3 
ERROR 
; 
; 
;CHECK KPARS 
3 
ERROR 
; 
; 
ERROR 
3 


; 
sCHECK UPDRS 
; 


; 
ERROR 
; 
; 
ERROR 
; 
; 
;CHECK UPARS 
: 
ERROR 
; 
; 
ERROR 


sLOAD MMRO<15:13>=111 

;CLEAR MMU ABORT FLAG 

;SAVE SRO IN RO 

;CLEAR UNDEFINED BITS FROM SRO 


;CHECK MMRO 
3 
ERROR 


SEQ 0155 


als KDJ11-8 CLUSTER macy 
OKDAB.P11 OS5-APR-84 16:4 


005037 
013700 
042700 
020027 
001401 
104002 


012737 
013700 
042700 
020027 
001401 
104002 


012737 
013700 
042700 
020027 
001401 
104002 


177572 
177572 
000176 
000000 


037610 


037612 
037620 
037624 
037630 
037634 
037636 
037640 
037640 


037640 
037644 
037650 
037656 
037664 
037666 
037670 
037674 
037702 
037704 
037706 
037714 
037722 
037724 
037726 
037734 
037742 
037744 
037746 
037746 


037746 


172516 


172516 
172516 


000052 
172516 


000025 
172516 


177572 
002776 


012737 


30( 1046) 05- tig 
MEMOR 


177572 


177572 


172516 
000077 


000000 


172516 
000052 


172516 
000025 


177776 


177776 


177776 
172516 


1$; 


2s: 


3$; 


1$: 


2s: 


3$: 


TSMMU6 : 


16:45 PAGE 157 
Y MANAGEMENT TESTS 
CLR #177572 
MOV @#SRO,RO 
BIC #176,RO0 
CMP RO, #0 
BEQ es 
ERROR +2 
MOV #120000 , 81 77572° 
MOV @@SRO,RO 
BIC #176,RO0 
CMP RO, #120000 
BEQ 3$ 
ERROR +2 
+ 
MOV #40000 ,84177572 
MOV @#SRO,RO 
BIC #176,RO0 
CMP RO, #40000 
BEQ 4$ 
ERROR +2 
TEST MMR3 BITS 5-0 
CLR 80177572 
CLR FLAG 
MOV #77,80172516 
CMP 8#172516,077 
BEQ 1$ 
ERROR 2 
CLR 8172516 
CMP 84172516, 40 
BEG es 
ERROR 2 
MOV $52 ,80172516 
CMP 84172516, 452 
BEQ 3$ 
ERROR 2 
MOV #25,80172516 
CMP 80172516, 2° 
BEQ 4$ 
ERROR +2 
CLR 0177572 
CLR @oF LAG 
MOV #140000 ,80177776 
MOV @STBOT,SP 
MOV R6 , B¢SAVUSE 
MOV #40000 ,80177776 
MOV oSTBOT,SP 
MOV R6, BOSAVSUP 
MUV #30000 ,80177776 
JSR PC, MMU ' 
MOV 927,80172516 


Nie 


;LOAD MMRO=0 

sSAVE SRO IN RO 

sCLEAR UNDEFINED BITS FROM SRO 
sCHECK MMRO 


3 
— ERROR 


;LOAD MMRO<15:13>-=101 

;SAVE SRO IN RO 

;CLEAR UNDEFINED BITS FROM SRO. 
;CHECK MMRO 


° 
sMMU ERROR 


;LOAD MMRO<15:13>=010 

;SAVE SRO IN RO 

;CLEAR UNDEFINED BITS FROM SRO. 
;CHECK MMRO 


: 
3MMU ERROR 


sMMU OFF 

sCLEAR MMU ABORT FLAG 
sLOAD MMR3<5:0>=77 
;CHECK MMRS 


° 

3;MMU ERROR 
3;LOAD MMR3<5:0>=0 
;CHECK MMR3 


é 

sMMU ERROR 
3LOAD MMR3<5:0>=52 
;CHECK MMRS5 


3 

sMMU ERROR 
;LOAD MMR3<5:0>=25 
;CHECK MMR3 


; 
:MMU ERROR 


TEST MFPI (MOVE FROM PREVIOUS INST SPACE) 
MMU OFF 


i 

;CLEAR MMU ABORT FLAG 

sPOINT TO USER SPACE 

sINIT THE USER STACK POINTER 
sSAVE USER SP 

sPOINT TO SUPERVISOR SPACE 
sINIT THE SUPERVISOR STACK POINTER 
sSAVE SUPERVISOR SP 

;SETUP PSW 

sINIT MMU 

;SETUP MMRS 


SEQ 0156 


COKDABO KDJ11-B CLUSTER MACY1L1 
COKDAB.P 11 05 -APR -84 16:45 


013746 000244 
177777 
135072 
077400 
000244 
177572 


030010 


177572 


012737 
020637 
001401 
104002 


023727 
001401 
104002 


02032? 
001401 
104002 


005037 
022627 
001401 
104002 


021627 
001401 
104002 


012737 


000246 


177776 
135072 


177777 


177572 
030011 


177572 
000244 


020127 
001401 
104002 


000244 


30( 1046) 05- 
ME 


000244 


137542 


177776 


177776 


177776 


135072 


177776 
000244 


177776 


173621 


APR - 84 


B14 


16:45 PAGE 158 


MORY MANAGEMENT TESTS 


18: 


1008; 


2008: 


2s; 


3$; 


4%; 


5%: 


3008; 


5018: 


80244, -( SP) sSAVE DATA AT TEST LOCATION 
177777, -CSP) sPUT KNOWN DATA ON TOP OF STACK 
9135072 ,80244 sSETUP DATA AT TEST LOCATION 
#77400, UDPDRO sSETUP UDPDRO TO ABORT 
0244 ,R3 . sSETUP POINTER TO TEST LOCATION 
80177572 3s TURN MMU ON 
(R3)-> 3s TEST INSTRUCTION 
#30010,80177776 31S PSW CORRECT 
1$ sYES GO ON 
2 sMMU ERROR 
sNO GO TO ERROR 
80177572 3 TURN MMU OFF 
0140000 ,80177776 sPOINT TO USER SPACE 
R6 , BOSAVUSE 3IS USER SP CORRECT 
100$ sYES GO ON 
2 sMMU ERROR 
sNO GO TO ERROR 
#40000 ,80177776 sPOINT TO SUPERVISOR SPACE 
R6 , BOSAVSUP sIS SUPERVISOR SP CORRECT 
200% 3YES GO ON 
2 sMMU ERROR 
3sNO GO TO ERROR 
80244 , 0135072 3IS TEST DATA Or 
2s sYES GO ON 
2 sMMU ERROR 
sNO GO TO ERROR 
R3, 0246 31S R3 CORREC’ 
3$ 3YES GO ON 
rd sMMU ERROR 
sNO GO TO ERROR 
80177776 3SET PSW TO KERNEL MODE 
(SP )+,0135072 3IS KERNEL STACK CORRECT 
43 sYES GO ON 
2 ;MMU ERROR 
sNO GO TO ERROR 
(SP),0177777 31S STACK CORRECT 
58 3YES GO ON 
2 sMMU ERROR 
sNO GO TO ERROR 
930017,80177776 sSETUP PSW 
173621,00244 sSETUP TEST LOCATION 
0244,R1 SETUP R1 
@017757e2 3; TURN MMU ON 
(RL) sTEST INSTRUCTION 
930011,90177776 31S PSwW CORRECT 
5008 3YES GO ON 
2 3;MMU ERROR 
s3NO GO TO ERROR 
@0177572 3 TURN MMU OFF 
80244 0173621 3IS TEST LOCATION CORREC? 
301% sYES GO ON 
2 3MMU ERROR 
3NO GO TO ERROR 
R1,0044 15 RL CORRECT 


500% 37—S GO ON 
2 sMMU ERROR 


SEQ 0157 


is 


COKDABO KDI11 B CLUSTER vied) §0( 1046) O05 APR 84 16:45 PAGE 159 


COKDAB LP 11 OS APR 84 le: MEMORY MANAGEMENT TESTS SEQ 0158 
8040 sNO GO TO ERROR 
8641 040276 0050387 177776 302%; CLR @0177776 3SET PSw TO KERNEL MODE 
8642 0403802 022627 173621 cmp (SP )+,0173621 31S STACK CORRECT 
8645 040306 001401 BEQ 303$ ;YES GO ON 
8644 040310 104002 ERROR +2 sMMU ERROR 
8645 sNO GO TO ERROR 
8046 040312 021627 177777 3038; CMP (SP),0177777 3IS STACK CORRECT 
8647 040316 001401 BEQ 3048 ;¥ES GO ON 
8648 040320 104002 ERROR +2 :MMU ERROR 
8649 sNO GO TO ERROR 
8650 040322 005003 304%: CLR R3 s;SETUP SOURCE FOR NEXT TEST 
8051 040324 005237 177572 INC 90177572 ;TURN MMU ON 
8652 040330 006503 MF PI R38 3s TEST INSTRUCTION 
8653 040332 022737 000004 1777%6 CMP 04,90177776 31S PSwW CORRECT 
8654 040340 001401 BEQ 6$ sYES GO ON 
8055 040342 104002 ERROR +2 sMMU ERROR 
8656 sNO GO TO ERROR 
8657 040344 005037 177572 63: CLR @0177572 ;TURN MMU OFF 
8658 040350 020327 000000 CMP R3,00 31S R3 CORRECT 
3659 040354 001401 BEQ 7$ 3YES GO ON 
8660 040356 104002 ERROR +2 3;MMU ERROR 
8661 sNO GO TO ERROR 
8662 040360 022627 000000 7$; CMP (SP )+,00 3IS STACK CORRECT 
8663 040364 001401 BEQ 8s sYES GO ON 
8664 040366 104002 ERROR +2 ;MMU ERROR 
8665 3NO GO TO ERROR 
8666 040370 022627 177777 8s; CMP (SP)+,0177777 3IS STACK CORRECT 
8667 040374 001401 BEQ 93 sYES GO ON 
8668 040376 104002 ERROR +2 sMMU ERROR 
8669 sNO GO TO ERROR 
asi 040400 012637 000244 9%: MOV (SP)+,@0244 sRESTORE TEST LOCATION 
8672 ; 
8673 040404 TSMM6B : 
8674 ; TEST MFPD (MOVE FROM PREVIOUS DATA SPACE ) 
8675 040404 005037 177572 CLR @0177572 sMMU OFF 
8676 040410 005037 002776 CLR @eF LAG ;CLEAR MMU ABORT FLAG 
B677 040414 012737 140000 177776 MOV 140000,9801777 76 sPOINT TO USER SPACE 
8678 040422 010637 003002 MOV R6 , BOSAVUSE ;SAVE USER SP 
8679 040426 012737 040000 177776 MOV 040000 ,80177776 sPOINT TO SUPERVISOR SPACE 
8680 040434 010637 003000 MOV R6, BOSAVSUP ;SAVE SUPERVISOR SP 
8681 040440 012737 030000 177776 MOV 030000 ,@0177776 3SETUP PSw 
8682 040446 004767 072462 JSR PC, MMU ;INIT MMU 
8683 040452 012737 000027 172516 MOV ©27,80172516 ;SETUP MMRS 
8634 040460 013746 000244 MOV @9244, -(SP) 3SAVE DATA AT TEST LOCATION 
8685 040464 012746 177777 MOV 0177777, -(SP) 3PUT KNOWN DATA ON TOP OF STACK 
B686 040470 012737 157002 000244 MOV #157002 ,80244 ;SETUP DATA AT TEST LOCATION 
8687 040476 012767 077400 137074 MOV &7?7400,UIPDRO 3SETUP UIPDRO TO ABORT 
8688 049504 012703 000244 MOV 0244,R5 ;SETUP POINTER TO TEST LOCATION 
8689 040510 005237 177572 INC @O1/ 7572 ;TURN MMU ON 
8690 040514 106523  MFPD (R3)> s TEST INSTRUCTION 
8691 040516 022737 030010 1777% CMP 030010,a01777 76 31S PSw CORRECT 
8692 040524 001401 BEQ 1s ;YES GO ON 
869% 040526 104092 ERROR 2 ;MMU ERROR 
36,94 3NUO GO TO ERROR 


3695 0405350 005037 177572 183 CLR @O17? 7570 3 TURN MMU OFF 


COKDAB 
ConKndag 


0 KDILL 8 CLUSTER 
-P1i OS AP 


040534 
040540 


040740 
040744 
040746 


040750 
940756 


R a4 


023727 
001401 
104002 


020327 
001401 
104002 


005037 
022627 
001401 
104002 


021627 
001401 
104002 


012737 
012737 
012701 
0052357 
106511 
022737 
001401 
104002 


005037 
023727 
001401 
104002 


020127 
001401 
104002 


005037 
022627 
001401 
104002 


021627 
001401 
104002 


012737 
012737 


MACYI1 30( (046) 


16:45 


140000 
008002 


040000 
003000 


000244 


000246 


177776 
157002 


L77777 


030017 
103456 
000244 
177572 


030011 


177572 
000244 


000244 


177776 
103456 


177777 


030017 
115672 


177776 


177??? 


177776 
000244 


177776 


103456 


177776 
900244 


D1 4 


OS APR-84 16:45 PAGE 160 

MEMORY MANAGEMENT TESTS 
MOV #140000 ,80177776 
CMP R6 , BOSAVUSE 
BEQ 100$ 
ERROR +2 

1008; MOV #40000 ,80177776 
CMP R6 , BOSAVSUP 
BEQ 200% 
ERROR *2 

2008: CMP 80244 , 0157002 
BEQ 2s 
ERROR +2 

2s: CMP R3,0246 
BEQ 3$ 

3$; CLR 80177776 
CMP (SP)+, 0157002 
BEQ 4$ 
ERROR *2 

4$: CMP (SP),0177777 
BEQ 5$ 
ERROR +2 

S$: MOV 930017,80177776 
MOV 9103456 ,80244 
MOV $244,R1 
INC a0177572 
MF PD (R1) 
CMP 930011,80177776 
BEQ 300$ 
ERROR *2 

3008: CLR a0177572 
cmp 00244, 9103456 
BEQ 301% 
ERROR “2 

301$: CMP R1, 0244 
BEQ 402% 
ERROR °2 

302%: CLR @¢1/7776 
CMP (SP )+, 9103456 
BEQ 3033 

303s; CMP (SP ),0177777 
BEQ 304$ 
ERROR 2 

3043; MOV 030017,@01777?% 
MOV #113672, 80044 


sPOINT TO USER SPACE 
31S USER SP CORRECT 
sYES GO ON 
sMMU ERROR 
3NO GO TO ERROR 
sPOINT TO SUPERVISOR SPACE 
sIS SUPERVISOR SP CORRECT 
3s YES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
31S TEST DATA OK 
sYES GO ON 
;MMU ERROR 
sNO GO TO ERROR 
31S R3 CORRECT 
3YES GO ON 
s4MU ERROR 
:NO GO TO ERROR 
3SET PSW TO KERNEL MODE 
3IS KERNEL STACK CORRECT 
:’ES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
3IS STACK CORRECT 
:YES GO ON 
;4MU ERROR 
sNO GO TO ERROR 
2SETUP PSW 
2SETUP TEST LOCATION 
sSETUP RL 
3; TURN MMU ON 
sTEST INSTRUCTION 
sIS PSwW CORRECT 
YES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
3; TURN MMU OFF 
3IS TEST LOCATION CORRECT 
3;1ES GO ON 
sMMU ERROR 
3NO GO TO ERROR 
3IS R1 CORRECT 
;YES GO ON 
sMMU ERROR 
3NO GO TO ERROR 
3SET PSW TO KERNEL MODE 
3IS STACK CORRECT 
3YES GO ON 
;MMU ERROR 
:NO GO TC ERROR 
31S STACK CORRECT 
sYES GO ON 
;MMU ERROR 
3NO GO TO ERROR 
sSETUP PSW 
soETUP TEST LOCATION 


“FQ 015% 


COKDABO KOILL 8B CLUSTER 


COKDAB.P 11 


040764 
040770 
040774 
040776 
041004 
041006 


041010 
041014 
041022 
041024 


041026 
041032 
041034 


041036 
041042 
041046 
041050 


O05 -APR -84 


012701 


020127 
001401 
104002 


005037 
022627 
001401 
104002 


021627 
001401 
104002 


005003 
005237 
106503 
022737 
001401 
104002 


005037 
020327 
001401 
104002 


022627 
001401 
104002 


022627 
001401 
104002 


012637 


005037 
005037 
012737 
010637 
012737 
010637 


MACY11L 30( 1046) 


16:45 


000246 
177572 


030011 


177572 
000244 


000244 


177776 
113672 


177777 


177572 
000004 


177572 
000000 


000000 


177777 


000244 


177572 
002776 


177776 


115672 


177776 


177776 
1777%6 


05 - APR -84 


E14 


16:45 PAGE 161 


MEMORY MANAGEMENT TESTS 


400%: 


401%: 


4028: 


4035: 


404%: 


6$: 


7$3 


0246,R1 
80177572 


(R1) 
#30011,80177776 


400$ 

+2 

a4177572 
80244, 0113672 
401$ 

+2 

R1, 0244 

402$ 

+2 

80177776 

(SP )+,0113672 
403$ 

+2 
(SP),@177777 
404% 


+2 


R3 

a177572 

R3 
@4,90177776 
6$ 

2. 


@@177572 
R3,00 


(SP)+,@177777 
9$ 


°2 


C5P)+, 88244 


sSETUP R1 
s TURN MMU ON 
sTEST INSTRUCTION 
3IS PSw CORRECT 
;YES GO ON 

sMMU ERROR 

sNO GO TO ERROR 
3 TURN MMU OFF 
:IS TEST LOCATION CORRECT 
;YES GO ON 

;MMU ERROR 

sNO GO TO ERROR 
3IS R1 CORRECT 
;YES GO ON 

;MMU ERROR 

sNO GO TO ERROR 
sSET PSW TO KERNEL MODE 
3IS STACK CORRECT 
:YES GO ON 

;MMU ERROR 

3NO GO TO ERROR 
sIS STACK CORRECT 
sYES GO ON 

;MMU ERROR 

sNO GO TO ERROR 
sSETUP SOURCE FOR NEXT TEST 
; TURN MMU ON 
3; TEST INSTRUCTION 
3IS PSW CORRECT 
:YES GO ON 

3MMU ERROR 

sNO GO TO ERROR 
3; TURN MMU OFF 
31S R3 CORRECT 
3YTES GO ON 

34M ERROR 

3NO GO TO ERROR 
315 STACK CORRECT 
YES GO ON 

sMMU ERROR 

3NO GO TO ERROR 
3IS STACK CORRECT 
;YES GO ON 

3M™) ERROR 

3NO GO TO ERROR 
sRESTORE TEST LOCATION 


TEST MIPI (MOVE TO PREVIOUS INSTRUCTION SPACE ) 


CLR 


a0177572 
@OF LAG 


#140000 ,a91777 7’ 


R6 , DOSAVUSE 


#40000 ,80177776 


R6, AOSAVSUP 


3sMMU OFF 

sCLEAR MMU ABORT FLAG 
sPOINT TO USER SPACE 

s5AVE USER SP 

sPOINT TO SUPERVISOR SPACE. 
s0AVE SUPERVISOR SP 


SEQ 0160 


COKRDABO KDI11 8B mee ae 


COKDAB.P 11 


8808 
8809 
8810 
8811 
88i2 
8813 
8814 


OS - APR -84 


012737 
004 767 
012737 
013746 


012737 
020637 
001401 
104002 


023727 
001401 
104002 


020327 
001401 
104002 


005037 
021627 
001401 
104002 


012737 


020127 
001401 
104002 


MACY 11 
16:45 


030000 
071722 
000027 
000244 
177777 
120413 
177777 
077400 
000244 
177572 


030010 


177572 


000246 


177776 
177777 


030017 
145121 
000244 
177572 


030011 


171272 
000244 


000244 


50( 1046) 


177776 
172516 


177776 


177776 


120413 


177776 


177776 


145121 


ris 
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MEMORY MANAGEMENT TESTS 
MOV #30000 ,80177776 
JSR PC MMU 
MOV @27,80172516 
MOV 80244, (SP) 
MOV 0177777, -CSP) 
MOV 120413, -(SP) 
MOV 9177777,80244 
MOV #77400, UDPDRO 
MOV 0244 ,R3 
INC 80177572 
MTIPI (R3)> 
CMP #30010,90177776 
BEQ 1$ 
ERROR +2 

$: CLR 80177572 

MOV #140000 ,30177776 
CMP R6 , BOSAVUSE 
BEQ 100$ 
ERROR ee 

1008: MOV #40000 ,8¢177776 
CMP R6,@e@SAVSUP 
BEQ 200$ 
ERROR +2 

200$: CMP 80244 , #120413 
BEQ 2s 
ERROR 2 

2s: CMP R3, 7246 
BEQ 3$ 
ERROR +2 

3$; CLR @@177776 
CMP (SP),@177777 
BEQ 4s 
ERROR 2 

43: MOV 930017,80177776 
MCV #145121, -(SP) 
MOV 0244 ,R1i 
INC @0177572 
MTPI (R11) 
CMP #30011,90177776 
BEQ 300$ 
ERROR °2 

300$: CLR a¢177572 
CMP 20244 ,0145121 
BEQ 301% 
ERROR +2 

3018: CMP R1,%244 
BEQ 302% 
ERROR 2 


sSETUP PSW 
sINIT MMU 
sSETUP MMRS 
sSAVE DATA AT TEST LOCATION 
sPUT KNOWN DATA ON STACK 
sPUT TEST DATA ON STACK 
sPUT KNOWN DATA AT TEST LOCATION 
;SETUP UDPDRO TO ABORT 
;SETUP POINTER TO TEST LOCATION 
;TURN MMU ON 
3: TEST INSTRUCTION 
31S PSW CORRECT 
:YES GO ON 

sMMU ERROR 

3NO GO TO ERROR 
3; TURN MMU OFF 
sPOINT TO USER SPACE 
3IS USER SP CORRECT 
:YES GO ON 

sMMU ERROR 

sNO GO TO ERROR 
sPOINT TO SUPERVISOR SPACE 
:IS SUPERVISOR SP CORRECT 
sYES GO ON 

;MMU ERROR 

:NO GO TO ERROR 
:IS TEST LOCATION CORRECT 
;YES GO ON 

;MMU ERROR 

sNO GO TO ERROR 
;IS R3 CORRECT 
:YES GO ON 

3MMU ERROR 

:NO GO TO ERROR 
;SET PSW TO KERNEL MODE 
31S KERNEL STACK CORRECT 
;YES GO ON 

sMMU ERROR 

3:NO GO TO ERROR 
sSETUP PSw 
s;SETUP TEST DATA 
sSETUP R1 
3; TURN MMU ON 
sTEST INSTRUCTION 
31S PSw CORRECT 
YES GO ON 

3MMU ERROR 

sNO GO TO ERROR 
;TURN MMU OFF 
3IS TEST LOCATION CORRECT 
sYES GO ON 

3 MMU ERROR 

3;NO GO TO ERROR 
31S R1 CORRECT 
3¥—€S GO ON 

;MMU ERROR 


SEQ 0161 


COKDABO KDNILL B CLUSTER MACY11 5001046) 


COKDAB.P 11 


041674 


05 APR 84 


005037 

21627 
001401 
104002 


012737 
012746 
012701 
005237 
006641 
022737 
001401 
104002 


005037 
023727 
001401 
104002 


020127 
001401 
104002 


005037 


010657 


16:45 


177572 
000244 


000244 


177776 
RTTsTT 


177572 
000004 


177572 
000000 


177777 


000244 


oor 
177776 


17°7776 


22347 


177776 


177776 


1°77%6 


05 APR -84 
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MORY MANAGEMENT TESTS 


3028: 


3048; 


4008: 


401$: 


4028: 


4043: 


S$: 


6$: 


@9177776 
(SP),@177777 
304% 

+2 


@30017,80177776 
#122347, (SP) 


#30011,90177776 
400% 
+2 


80177572 
OF244, 7122347 
401$ 

+2 


R1,0244 
402$ 
+2 


90177776 
(SP),0177777 
404$ 

*e 


-(SP) 
a0177572 
R 


3 
04,99177776 
S$ 
+e 
80177572 
R3,90 
6$ 
*e 
(SP)+,@177777 
7$ 
+2 


(SP )+, 88244 


sNO GO TO ERROR 
;SET PSW TO KERNEL MODE 
3IS STACK CORRECT 
;YES GO ON 
3;MMU ERROR 
3NO GO TO ERROR 
s;SETUP PSW 
;SETUP TEST DATA 
;SETUP R1 
3; TURN MMU ON 
sTEST INSTRUCTION 
31S PSW CORRECT 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
3; TURN MMU OFF 
3IS TEST LOCATION CORRECT 
;YES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
:IS R1 CORRECT 
:;YES GO ON 
;MMU ERROR 
3;NO GO TO ERROR 
SET PSW TO KERNEL MODE 
3IS STACK CORRECT 
:YES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
;SETUP STACK FOR NEXT TEST 
3; TURN MMU ON 
: TEST INSTRUCTION 
:IS PSW CORRECT 
:YES GO ON 
3;MMU ERROR 
3NO GO TO ERROR 
s;TURN MMU OFF 
3IS R3 CORRECT 
YES GO ON 
3MMU ERROR 
3NO GO TO ERROR 
31S STACK CORRECT 
;YES GO ON 
sMMU ERROR 
3;NO GO TO ERROR 
sRESTORE TEST LOCATION 


TEST MTPD (MOVE TO PREVIOUS DATA SPACE ) 


CLR 
CLR 
MOV 
MOV 
MOV 
MOV 


@0177572 

aoF LAG 

#140000 ,801777 ’o 
R6 , DOSAVUSE 
940000 ,8%1 77776 
R6, AOSAV SUP 


sMM! OFF 

sCLEAR MMU ABORT FLAG 
sPOINT TO USER SPACE 

sSAVE USER SP 

sPOINT TO SUPERVISOR SPACE 
sSAVE SUPERVISOR SP 


SEQ 0162 


COKDABO KDI11 B CLUSTER macy it 30( 1046) 
05 -APR 84 16:45 


COKDAB P11 


041700 
041706 
041712 
041720 
041724 


012737 
004767 
012737 
013746 
012746 
012746 
012737 
012767 
012703 
005237 
106623 
022737 
001401 
104002 


005037 
012737 
020637 
001401 
104002 


012737 
020637 
001401 
104002 


023727 
001401 
104002 


020327 
001401 
104002 


005037 
021627 
001401 
104002 


012737 
012746 
012701 
005237 
106611 
022737 
001401 
104002 


005037 
023727 
001401 
104002 


020127 
001401 
104902 


000244 
177572 


030010 


177572 


000246 


177776 
177777 


030017 
100737 
000244 
177572 


030011 


177572 
000244 


000244 


177776 
172516 


000244 


135630 


177776 


177776 


177776 


100004 


177776 


177776 


100737 


05 -APR 84 
MEMOR1 MANAGEMENT TESTS 


1$: 


100$: 


200$: 


2s: 


4$: 


300%: 


3018: 


Hd 4 


16;45 PAGE 164 


#30000 ,80177776 sSETUP PSW 

PC MMU sINIT MMU 

027,80172516 sSETUP MMRS 

@0244, (SP) sSAVE DATA AT TEST LOCATION 


9177777, -(SP) 
#100004, -( SP) 


sPUT KNOWN DATA ON STACK 
sPUT TEST DATA ON STACK 


177777,80244 3PUT KNOWN DATA AT TEST LOCATION 
#77400, UIPDRO ;SETUP UIPDRO TO ABORT 
244 ,R3 ene POINTER TO TEST LOCATION 
80177572 sTURN MMU ON 
CR3)> 3 TEST INSTRUCTION 
#30010 ,80177776 31S PSwW CORRECT 
1$ ;YES GO ON 
+2 ;MMU ERROR 
:NO GO TO ERROR 
a0177572 ; TURN MMU OFF 
#140000 ,80177776 sPOINT TO USER SPACE 
R6 , BOSAVUSE 31S USER SP CORRECT 
100$ sYES GO ON 
2 sMMU ERROR 
:NO GO TO ERROR 
#40000 ,80177776 sPOINT TO SUPERVISOR SPACE 
R6 , B@SAVSUP :I1S SUPERVISOR SP CORRECT 
200$ sYES GO ON 
+2 :MMU ERROR 
;NO GO TO ERROR 
89244 , #100004 :IS TEST LOCATION CORRECT 
es 3;YES GO ON 
+2 3MMU ERROR 
;NO GO TO ERROR 
R3,%246 31S R3 CORRECT 
3$ sYES GO ON 
+2 3MMU ERROR 
:NO GO TO ERROR 
00177776 ;SET PSW TO KERNEL MODE 
€SP),@177777 3IS KERNEL STACK CORRECT 
4$ :YES GO ON 
+2 sMMU ERROR 
3NO GO TO ERROR 
#30017,80177776 3;SETUP PSW 
#100737, -(SP) ;SETUP TEST DATA 
9244,R1 ;SETUP R1 
@¢0177572 ; TURN MMU ON 
(R1) sTEST INSTRUCTION 
#30011,80177776 :IS PSwW CORRECT 
300$ 3YES GO ON 
+2 sMMU ERROR 
:NO GO TO ERROR 
a0177572 ; TURN MMU OFF 
0244, 0100737 3IS TEST LOCATION CORRECT 
301$ 3YES GO ON 
+2 3MMU ERROR 
s;NO GO TO ERROR 
R1,0244 :IS R1 CORRECT 
302% sYES GO ON 


+2 3MMU ERROR 


SEQ 016% 


COKDABO KDJ11-6 we te 
COKDAB.P 11 


8976 


0S -APR -84 


005037 
021627 
001401 
104002 


012737 


022627 
001401 
104002 


012637 


005037 
005067 
013746 
013746 
005067 
005067 


MACY11L 30( 1046) 


16:45 


177776 
177777 


030017 
156711 
000246 
177572 


030011 


177572 
000244 


000244 


177776 
177777 


177572 
000004 


177572 
000000 


177777 


000244 


177572 
140422 
000214 
000216 
140414 
140412 


177776 


177776 


156711 


177776 


0S APR -84 
ME 


114 
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MORY MANAGEMENT TESTS 


3028: 


3045: 


400$: 


401$: 


4025: 


4043: 


S$: 


6$: 


0177776 
(SP),0177777 
304$ 

+2 


#30017 ,80177776 
#156711, -CSP) 
#246,R1 


#30011,980177776 
400$ 

+2 

a¢177572 
20244, 4156711 
401$ 

+2 

R1, 0244 

402$ 

+2 

80177776 
(SP),@177777 
404$ 

+2 


-(SP) 
a 


3 
04 ,90177776 
5$ 
+2 
#177572 
R3,20 
6$ 
+2 
(SP)+, #177777 
7$ 
+2 
(SP )+,@244 


TEST NON-RESIDENT ABORT 


CLR 
CLR 
MOV 
MOV 
CLR 
CLR 


sNO GO TO ERROR 
3;SET PSW TO KERNEL MODE 
3IS STACK CORRECT 
;YES GO ON 
sMMU ERROR 
:NO GO TO ERROR 
sSETUP PSW 
;SETUP TEST DATA 
;SETUP R1 
3 TURN MMU ON 
: TEST INSTRUCTION 
31S PSW CORRECT 
;YES GO ON 
;MMU ERROR 
sNO GO TO ony 
3 TURN MMU OFF 
3IS TEST LOCATION CORRECT 
;YES GO ON 
;MMU ERROR 
:NO GO TO ERROR 
:IS R1 CORRECT 
;YES GO ON 
;MMU ERROR 
:NO GO TO ERROR 
3SET PSW TO KERNEL MODE 
3IS STACK CORRECT 
:YES GO ON 
sMMU ERROR 
:;NO GO TO ERROR 
;SETUP STACK FOR NEXT TEST 
3 TURN MMU ON 
3; TEST INSTRUCTION 
3IS PSW CORRECT 
;YES GO ON 
sMMU ERROR 
3NO GO TO ERROR 
s;TURN MMU OFF 
3IS R3 CORRECT 
3YES GO ON 
3MMU ERROR 
sNO GO TO ERROR 
3:IS yy? CORRECT 
;YES GO ON 
sMMU ERROR 
3NO GO TO ERROR 
sRESTORE TEST LOCATION 


3sMMU OFF 
;CLEAR MMU ABORT FLAG 
3;SAVE DATA AT TEST LOCATIONS 


; 
;CLEAR STATUS REGS SAVE AREAS 
; 


SEQ 0164 


COKDABO KDJ11-B CLUSTER MACY11 
COKDAB.P11 


042374 
042400 
042404 
042412 
042416 
042424 


042430 
042436 


005067 
004 767 
012737 
012702 
012737 
004767 


012737 
004767 


012701 
004767 


012737 
012737 
005037 
006522 
012603 
012637 
012637 


000167 


012767 
012737 
010701 


05-APR-84 16:45 


030000 
077400 
177572 


000216 
000214 


000154 


000001 
000001 


30( 1046) 


177776 
177600 


177600 


140314 
177572 
177776 


140244 
177572 
177776 


177776 


177600 


140154 
177572 


05 - APR -84 


J13 
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MEMORY MANAGEMENT TESTS 


MOV 
JSR 


JMP 


; 
sROUTINE TO CAUSE AND CHECK 


3 

TS7:; MOV 
MOV 
MOV 


SAVMR2 


PC MMU 

#30000, 90177776 
#200,R 

#77400, , 89177600 
PC,1S7 


#77404 ,80177600 
PC,TS” 


#1,FLAG 
#1,89177572 
#100000 ,80177776 
(R2)+,-CR1) 
PC,TSM7 


SAVMRO 

SAVMR1 

SAVMR2 

#22,R3 

#1,FLAG 
#1,90177572 
#20000 ,80177776 
(R2)+ 

PC,TSM7 


#30000 ,8#177776 
#77400 ,8¢177600 
8177572 

(R2)+ 

(SP )+,R3 

(SP )+,a@#216 

(SP )+,a#214 


TS7F IN 


#1,FLAG 
#1,00177572 
R7,R1 


3 
sINIT MMU 
sSETUP PSwW 


é 

sSETUP FOR AN ABORT 

sCAUSE AN ABORT TO OCCUR AND 

s THEN CHECK IF ABORT FLAG REGISTERED 
sTHIS EVENT AND CHECK IF STATUS REGS 
sCONTAINED EXPECTED VALUES. 

;IF NO ABORT OCCURRED THEN GO TO ERROR 
sOTHERWISE CONTINUE. 

;SETUP FOR AN ABORT 

;CAUSE AN ABORT TO OCCUR AND 

3 THEN CHECK IF ABORT FLAG REGISTERED 
;THIS EVENT AND CHECK IF STATUS REGS 
sCONTAINED EXPECTED VALUES. 

;IF NO ABORT OCCURRED THEN GO TO ERROR 
sOTHERWISE CONTINUE. 


3 

sINIT MMU 

;SETUP MMR1 EXPECTED DATA 

;SETUP FLAG FOR AN ABORT 

;TURN MMU ON 

sSETUP PSW FOR AN ABORT CILLEGAL MODE > 
sCAUSE AN ABORT 

;CHECK IF AN ABORT OCCURRED By 
sCHECKING ABORT FLAG AND STATUS REGS 
;IF NO ABORT OCCURRED THEN GO TO ERROR 
sOTHERWISE CONTINUE. 

sCLEAR STATUS REGS SAVE AREAS 

‘ 


; 

sSETUP MMR1 EXPECTED DATA 
;SETUP FLAG FOR AN ABORT 
;TURN MMU ON 


sSETUP PSW FOR AN ABORT (ILLEGAL MODE) © 


;CAUSE AN ABORT 

;CHECK IF AN ABORT OCCURRED By 
sCHECKING ABORT FLAG AND STATUS REGS 
3IF NO ABORT OCCURRED THEN GO TO ERROR 
sOTHERWISE CONTINUE. 

;SETUP PSwW 

;SETUP FOR AN ABORT 

sMMU OFF 

;TRY TO CAUSE AN ABORT 

sPOP THE STACK 

sRESTORE DATA AT TEST LOCATIONS 

3 


NONRESIDENT ABORTS 


;SETUP FOR AN ABORT 
; TURN MMU ON 
;SAVE PC 


SEQ 0165 


COKDABO KDJ11-B CLUSTER 


COKDAB.P11 


042632 
042634 
042642 
042644 


042646 
04265¢ 
042660 
042662 


2664 
042672 
042674 


042676 
042702 
042704 


042706 
042712 
042716 
042722 


042724 
042732 


042734 


042736 
042744 
042752 
042754 


042756 
042762 
042764 


042766 


OS - APR -84 


006522 
022767 
001401 
104002 


105067 
022767 
001401 
104002 


026727 
001401 
104002 


026701 


022767 
001401 
104002 


042737 
022767 
001401 
104002 


020367 


001401 
104002 


012767 


MACY11 30(1046) 05-APR-84 


16:45 


000000 


140132 
100000 


140116 


140106 


140072 
140070 
140066 


000000 


040377 
100000 


140024 


177572 
137774 
000244 
000246 
137766 
137764 
137762 
070102 
030000 
000244 
077402 
000246 
000001 


140134 


140124 


000022 


140044 


003004 
140032 


177776 
177600 
137712 


16:45 PAGE 167 
MEMORY MANAGEMENT TESTS 


;CAUSE AN ABORT 
sDID AN ABORT OCCUR 
3IF YES GO ON 

sMMU ERROR 

:IF NO GO TO ERROR 
;SETUP EXPECTED DATA 
: TEST MMRO FOR EXPECTED VALUE 
;IF OK THEN CONTINUE 

:MMU ERROR 

sNOT OK THEN GO TO ERROR 
; TEST MMR1 FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 

sMMU ERROR 

sNOT OK THEN GO TO ERROR 
; TEST MMR2 FOR EXPECTED VALUE 
;IF OK THEN CONTINUE 

3MMU ERROR 

sNOT OK THEN GO TO ERROR 
s;CLEAR STATUS REGS SAVE AREAS 
Hy 


3 
;RETURN 


sDID AN ABORT OCCUR 
;IF YES GO ON 


;IF NO THEN GO TO ERROR 
;SETUP EXPECTED DATA 
; TEST MMRO FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 


;IF NO THEN GO TO ERROR 
; TEST MMR1 FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 


;IF NOT OK THEN GO TO ERROR 
;RETURN 


sMMU OFF 
;CLEAR MMU ABORT FLAG 
;SAVE DATA AT TEST LOCATIONS 


:CLEAR STATUS REGS SAVE AREAS 
: 


3 
sINIT MMU 
sSETUP PSW 


° 
;SETUP FOR AN ABORT 
sPUSH DATA ONTO THE STACK 


MFPI (R2)+ 
CMP #0,FLAG 
BEQ OK7 
ERROR +2 
OK7: CLRB SAVMRO 
CMP #100000 , SAVMRO 
BEQ OKA? 
ERROR +2 
OKA?7: CMP SAVMR1, #22 
BEQ OKAY? 
ERROR +2 
OKAY7: CMP SAVMR2 ,R1 
BEQ OKAY7A 
ERROR 2 
OKAY7A: CLR SAVMRO 
CLR SAVMR1 
CLR SAVMR2 
RTS PC 
¢ 
sROUTINE TO CHECK IF A NONRESIDENT ABORT OCCURRED 
; 
TSM?: CMP #0,FLAG 
BEQ TSMA 
ERROR +2 
TSMA: BIC #40377, a#SAVMRO 
CMP #100000 , SAVMRO 
BEQ TSMB 
ERROR +2 
TSMB: CMP R3,SAVMR1 
BEQ TSMC 
ERROR +2 
TSMC: RTS PC 
3 
TS7FIN: NOP 
TSMMUS: 
: TEST READ ONLY ABORTS 
CLR a¢177572 
CLR FLAG 
MOV #244, -(SP) 
MOV @#246, -(SP) 
CLR SAVMRO 
CLR SAVMR1 
CLR SAVMR2 
JSR PC, MMU 
MOV #30000 ,80177776 
MOV 9244 ,RO 
MOV #77402 ,8#177600 
MOV #246, -(SP) 
MOV #1,FLAG 


;SETUP FLAG FOR AN ABORT 


SEQ 0166 


COKDABO KDJ11-B CLUSTER M 


COKD 05 - APR -84 


9144 
9145 
9146 


AB.P11 


043064 
043072 
043074 
043076 
043104 
043106 


043110 
043114 
043122 
043124 


043126 
043134 
043136 


043140 
043144 
043146 


043150 
043156 
043162 
043164 


043260 
043264 
043270 
043274 


012737 
010701 


022767 
001401 
104002 


020167 
001401 
104002 


012737 


012703 
012701 
012702 
004767 


16:45 
000001 


000000 


137670 
020000 


011026 
137644 


030000 
000002 


000246 
000244 


177572 
137572 
137574 
137572 
137570 
030000 


043706 
043756 
044024 
000030 


“al 30( 1046) 


177572 


137672 


137662 


137652 


177776 


177776 


172516 


L134 
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MEMORY MANAGEMENT TESTS 


1$; 


2s: 


3$;: 


4$: 


MOV #1,80177572 
MOV R7,R1 

MTPI (R2)> 

CMP #0,FLAG 

BEQ 1$ 

ERROR +2 

CLRB SAVMRO 

CMP #20000 , SAVMRO 
BEG es 

ERROR +2 

CMP #11026, SAVMR1 
BEQ 3$ 

ERROR 2 

CMP R1,SAVMR2 

BEG 4$ 

ERROR +2 

MOV #30000 ,80177776 
MTPI (R2)> 

MOV (SP )+,a0246 
MOV (SP )+,a#244 


3; TURN MMU ON 
sSAVE PC 
sCAUSE ABORT 
;DID ABORT OCCUR 
;IF YES THEN GO ON 
;MMU ERROR 
;IF NO THEN GO TO ERROR 
;SETUP EXPECTED DATA 
: TEST MMRO FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 
;MMU ERROR 
sOTHERWISE GO TO ERROR 
3; TEST MMR1 FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 
sMMU ERROR 
;OTHERWISE GO TO ERROR 
; TEST MMR2 FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 
;MMU ERROR 
;OTHERWISE GO TO ERROR 
;SETUP PSw 
;PUSH DATA ONTO STACK 
;TRY TO CAUSE ABORT 
sRESTORE DATA AT TEST LOCATIONS 
Hy 


TEST PAGE LENGTH ERROR ABORTS 


CLR a¢177572 

CLR FLAG 

CLR SAVMRO 

CLR SAVMR1 

CLR SAVMR2 

MOV #30000 ,80177776 
JSR PC MMU 

MOV oPLFO,R3 

MOV #BNO,R1 

MOV #ABORTO,R2 
MOV #26 ,9%0172516 
JSR PC, 1TSM9 

MOV #PLF1,R3 

MOV #BN1,R1 

MOV #ABORT?7,R2 
JSR PC, 1SM9 


sMMU OFF 

;CLEAR MMU ABORT FLAG 

;CLEAR STATUS REGS SAVE AREAS 
3 


‘ 

;SETUP PSW 

sINIT MMU 

;LET R3, R1, AND Re POINT TO THE 
;UPWARD EXPANSION TABLES 


3 

sDISABLE USER DATA SPACE 

;TURN MMU ON 

300 RELOCATIONS FOR THE DIFFERENT 
;VALUES OF THE PAGE LENGTH FIELD AND 
;BLOCK NUMBER. IF AN ABORT OCCURS 
;CHECK TO SEE IF IT WAS SUPPOSED TO, 
;AND IF YES CHECK ABORT FLAG AND 
sSTATUS REGISTERS. 

;LET R3, R1, AND R2 POINT TO THE 
sDOWNWARD EXPANSION TABLES 


: 

;TURN MMU ON 

:00 RELOCATIONS FOR THE DIFFERENT 
sVALUES OF THE PAGE LENGTH FIELD AND 
;BLOCK NUMBER. IF AN ABORT OCCURS 
sCHECK TO SEE IF IT WAS SUPPOSED TO, 
;AND IF YES CHECK ABORT FLAG AND 
;STATUS REGISTERS. 


SEQ 0167 


COKDABO KDJ11-8 CLUSTER 


COKDAB .P11 


005037 
012703 
012701 
011337 
006521 
012605 


000167 


012337 


022767 
001401 
104002 


MACY11 30( 1046) 
OS-APR-84 16:45 


177572 
043716 
043766 
177600 


000542 


137364 
040000 


000020 


137340 


137316 
137320 
137316 
137314 


000777 


137432 
177572 


137402 


137366 


137356 


137346 


M13 


sMMU OFF 
sPOINT TO A VALUE 8 SHOULD CAUSE 


300 A RELOCATION 
;POP THE STACK 


;SETUP UIPDRO 

sSAVE A COPY OF R1 

;SETUP FOR AN ABORT 

; TURN MMU ON 

;SAVE PC 

300 A RELOCATION OPERATION 
;WAS AN ABORT SUPPOSED TO OCCUR 
:IF YES GO TO 2$ 

3POP THE STACK 

:D0ID AN ABORT OCCUR 

:NO GO ON 


;MMU ERROR 
;YES GO TO ERROR 


: 
;DID AN ABORT OCCUR 
;YES GO ON 


;MMU ERROR 
sNO GO TO ERROR 


sSETUP EXPECTED DATA 
; TEST MMRO FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 


;MMU ERROR 


sNOT OK 


THEN GO TO ERROR 
; TEST MMR1 FOR EXPECTED VALUE 
3IF OK THEN CONTINUE 


;MMU ERROR 
sNOT OK THEN GO TO ERROR 


; TEST MMR2 FOR EXPECTED VALUE 
:IF OK THEN CONTINUE 


;MMU ERROR 
;NOT OK THEN GO TO ERROR 


;CLEAR MMU ABORT FLAG 
;CLEAR STATUS REGS SAVE AREAS 


; 
sPOINT TO NEXT ENTRY 
; 
; 


; 
sHAVE ALL ENTRIES BEEN TRIED 
3NO REPEAT 


O5-APR-84 16:45 PAGE 169 
MEMORY MANAGEMENT TESTS 
CLR 9177572 
MOV #PLF1+10,R3 
MOV #BN1+10,R1 
MOV (R3),8%177600 
MFPI CR1)+ 
MOV (SP)+,R5S 
JMP TS9OF IN 
3 
;ROUTINE TO CAUSE AND CHECK PAGE LENGTH ERROR ABORTS 
3 
TSM9: MOV (R3)+,9%177600 
MOV R1,RO0 
MOV #1,FLAG 
MOV #1,80177572 
MOV R7,R4 
MFPI @aCRO)-+ 
CMP CR2),4%0 
BNE 2s 
MOV (SP)+,R5 
CMP #1,FLAG 
BEQ 1$ 
ERROR +2 
1$: BR 6$ 
2s CMP #0,FLAG 
BEQ 3$ 
ERROR +2 
3$: CLRB SAVMRO 
CMP #40000 , SAVMRO 
BEQ 4$ 
ERROR +2 
4s: CMP #20,SAVMR1 
BEQ 5$ 
ERROR +2 
S$: CMP R4,SAVMR2} 
BEQ 6$ 
ERROR +2 
6$: CLR FLAG 
CLR SAVMRO 
CLR SAVMR1 
CLR SAVMR2 
INC R1 
INC R1 
INC R2 
INC Ro 
CMP (R3),#777 
BNE TSM9 
RTS PC 


3 
;UPWARD EXPANSION TABLES 


;YES RETURN 


SEQ 0168 


COKDABO KDJ11-B CLUSTER MACY11 30(1046) 05-APR-84 


COKDAB.P11 


OS - APR - 84 


16:45 


PLFO: . WORD 


BNO: . WORD 


sussssgssgegaee 


er OOroocorrorco 


ABORTO: 


. WORD 


16:45 PAGE 
MEMORY MANAGEMENT TESTS 


000700 


N13 


170 


SEQ 0169 


COKDABO KDJ11 8 CLUSTER MACY11 80( 1046) 


COKDAB.P 11 


043674 
043676 


O5-APR 84 16:45 


05 -APR 84 
ME 


ry 
sDOWNWARD EXPANSION TABLES 


3 
PLFi1; 


BN1: 


ABORT?: 


or Orr 


00416 


-O-rK COOC0O 


iz 
’ 
16:45 PAGE 171 
MORY MANAGEMENT TESTS 


| 4 


SEQ 0170 


COKDABO KDJ11 B 


COKDAB 


044322 


B CLUSTER MACY11 8001046) 
PL O05 -APR-84 16:45 


012737 
004767 
012737 
012702 
012767 
012737 
010701 
106522 
012704 
004767 


012737 
004767 
012737 
012702 
012767 
012737 
010701 
006522 
012704 
004767 


012757 


177572 


020000 


172302 
136626 
177572 


177776 
177636 


136552 
177572 


177776 
172212 


136476 
177572 


177776, 


3 
sTEST THAT ILLEGAL MODE CAUSES MMU ABORT 


3 
MOV 


C14 


020000 ,a01777/ 


OS APR 84 16:45 PAGE 1/v 

MEMORY MANAGEMENT TESTS 
. WORD r?) 
. WORD Oo 
» WORD 1 
» WORD 1 
. WORD 1 
. WORD 0 
. WORD 0 
. WORD 1 
. WORD 0 
» WORD 0 

TSOF IN: NOP 

TSMM10: 

3 FUNCTIONAL TEST OF BITS «6:1> OF MMRO 
CLR 80177572 sMMU OFF 
CLR FLAG ;CLEAR MMU ABORT FLAG 
CLR SAVMRO sCLEAR STATUS REGS SAVE AREAS 
CLR SAVMR1 : 
CLR SAVMRO : 
JSR PC, MMU s INIT Meu 
CLR 90177776 sINIT PSW: PREVIOUS MODE = KERNAL 
MOV 920200 ,R2 3 
MOV 977400 ,80172302 sSETUP KIPOR1L TO ABORT 
MOV O1,FLAG 3;SETUP FLAG FOR AN ABORT 
MOV 1,80177572 3;TURN MMU ON 
MOV R7,R1 3SAVE PC 
MF FI (R2)> 3:00 A RELOCATION VIA KIPARL 
MOV 9100003 ,R4 sSETUP EXPECTED DATA 
JSR PC,1TS10 sCHECK IF AN ABORT OCCURRED AND 

sIF YES CHECK BITS <6:1> OF MMRO. 
MOV 030000 ,80177776 sINIT PSW: PREVIOUS MODE = USER 
JSR PC MMU sINIT MMU 
MOV 077400,8017 7636 3SETUP UDPDR? TO ABORT 
MOV #160000 ,R2 3 
MOV O1L,FLAG sSETUP FLAG FOR AN ABORT 
MOV 1,80177572 3; TURN MMU ON 
MOV R7,R1 sSAVE PC 
MF PO (R2)-> 300 A RELOCATION VIA UDPAR? 
MOV 100177,R4 :;SETUP EXPECTED DATA 
JSR PC,1S10 sCHECK IF AN ABORT OCCURRED AND 
sIF YES CHECK BITS «6:1> OF MMRO. 

MOV 010000 ,90177776 sINIT PSW: PREVIOUS MODE: SUPERVISOR 
JSR PC,MMU ; INIT MMU 
MOV 077400001 ?2212 sSETUP SIPORS TO ABORT 
MOV #120000 ,R2 sACCESS PAGE OS 
MOV O1,FLAG sSETUP FLAG FOR AN ABORT 
MOV 1,00177572 3 TURN MMU ON 
MOV R’,R1 sSAVE PC 
MFP I (R2)° :D0 A RELOCATION VIA SIPARS 
MOV 0100053,R4 3SETUP EXPECTED DATA: ABORT, PAGE OS 
JSR PC,1S10 sCRECK IF AN ABORT OCCURRED AND 


sIf YES CHECK BITS <6:1> OF MMRO, 


( 
sINIT PSWrSET TL LEGAL PREVIOUS MODE 


SEQ O171 


COKDABO KNI11 B CLUSTER 
O5 -APR 84 


COKDAB.P 11 


9424 0443530 
9425 0443354 
9426 044340 
044346 
9428 044354 
044356 
044360 


044364 


004 767 
012702 
012767 
012737 
010701 
106522 
012704 


004767 


000167 


02276? 
001401 
104002 


020467 
001401 
104002 


022767 
001401 
104002 


020167 
001401 
104002 


005067 
005067 
005067 
000207 


MACY11 40( 1046) 


16:45 


136372 


000022 


136354 


136340 
136336 
136334 


177572 
136310 
030000 


136374 


136362 


177776 


177776 


177776 


14 


OS APR-84 16:45 PAGE 173 
MEMORY MANAGEMENT TESTS 
JSR PC, MMU 
MOV #40000 ,R2 
MOV O1,FLAG 
MOV #1,80177572 
MOV R7,R1 
MF PD (R2)+ 
MOV #100105,R4 
JSR PC,TS10 
JMP TLOF IN 


sINIT MMU 

sSET UP ACCESS TO PAGE 2 

sSETUP FLAG FOR AN ABORT 

3 TURN MMU ON 

sSAVE PC 

300 A RELOCATION 

sSETUP EXPECTED DATA: ABORT, ILLEGAL 
s PROCESSOR MODE, PAGE O02 

sCHECK IF AN ABORT OCCURRED AND 

sIF YES CHECK BITS <6:1> OF MMRO,. 


3 
sROUTINE TO CHECK IF A MMU ABORT OCCURRED AND IF STATUS REG MMRO 


sCONTAINS EXPECTED DATA 


Q 
TS1O: CMP @0,FLAG s0ID AN ABORT OCCUR 
BEQ 1$ ;YES GO ON 
ERROR +2 ;MMU ERROR 
sNO GO TO ERROR 
1$: CMP R4,SAVMRO 3 TEST MMRO FOR EXPECTED DATA 
BEQ es :0K GO ON 
ERROR ee 3MMU ERROR 
3NO GO TO ERROR 
2s: CMP 022, SAVMR1 ; TEST MMR1 FOR EXPECTED DATA 
BEQ 3$ s0K GO ON 
ERROR +2 3MMU ERROR 
3NO GO TO ERROR 
$$: CMP R1,SAVMR2 ; TEST MMR2 FOR EXPECTED DATA 
BEQ 4$ ;0K GO ON 
FRROR +2 ;MMU ERROR 
sNO GO TO ERROR 
4$: CLR SAVMRO sCLEAR MMU STATUS REGS SAVE AREAS 
CLR SAVMR1 ; 
CLR SAVMR2 ; 
RTS PC sRETURN 
TLOF IN 
TSMM11; 
; TEST DATA SPACE BITS MMR3 
CLR a0177572 sMMU OFF 
CLR FLAG ;CLEAR MMU ABORT FLAG 
MOV #30000 ,80177776 sSETUP PSW 
MOV 026,R1 sSETUP FIRST MMR3S VALUE 
MOV #177610,R3 sPOINT TO UIPDOR4S 
MOV @1,R4 sSETUP SECOND MMRS VALUE 
JSR PC. TSiLL ; TEST ENABLE USER DATA SPACE BI’ 
MOV 00,80177776 sSETUP PSW 
MOV 023,R1 sSETUP FIRST MMRS VALUE 
MOV #172310,R5 sPOINT TO KIPDRG 
MOV 024 ,R4 sSETUP SECOND MMRS VALUE 
JSR PC,.1S11 ; TEST ENABLE KERNEL DATA SPACE Bi” 
MOV #10000 ,80177776 sSETUP PSwW 
MOV 025,R1 sSETUP FIRST MMRS VALUE 
MOV @172210,R3 sPOINT TO SIPORS 
MOV 022,R4 s5— TURP SECOND MMR VALUE 


SEQ O172 


fF 14 


COKDABO KNI11 B CLUSTER MACY11 30(1046) O5 APR-84 16:45 PAGE 174 


COKDAR P11 OS -APR-84 16:45 MEMORY MANAGEMENT TESTS SEQ 917% 
9480 044564 004767 000004 JSR PC,TS11 s TEST ENABLE SUPERVISOR DATA SPACE BIT 
9481 
eee | 044570 000167 000120 JMP TLIF IN 
9482 i 
aan sROUTINE TO TEST ENABLE DATA SPACE BITS OF MMRS 
948 3 
9486 044574 004767 066334 TSl1l: JSR PC MMU sINIT MMU 
9487 044600 010137 172516 MOV R1,80172516 sOISABLE DATA SPACE OF MODE UNDER TEST 
9488 044604 012713 077400 MOV #77400,(R3) sSETUP IPOR TO ABORT 
9489 044610 012702 100000 MOV #100000 ,R2 ; 

9490 044614 012767 000001 136154 MOV #1,FLAG sSETUP FLAG FOR AN ABORT 

9491 044622 012737 000001 177572 MOV #1,80177572 sMMU ON 

9492 044630 106522 MF PD (R2)+ 300 A RELOCATION 

9493 044632 022767 000000 136136 CMP #0,FLAG ;0ID AN ABORT OCCUR 

9494 044640 001401 BEQ is sYES GO ON 

9495 044642 104002 ERROR +2 sMMU ERROR 

9496 sNO GO TO ERROR 

9497 044644 010437 172516 1$: MOV R4,90172516 sENABLE DATA SPACE OF MODE UNDER TEST 
9498 044650 012702 100000 MOV #100000 ,R2 y 

9499 044654 012767 000001 136114 MOV #1,FLAG sSETUP FLAG FOR AN ABORT 
9500 044662 012737 000001 177572 MOV #1,80177572 sMMU ON 

9501 044670 106522 MFPD CR2)+ 300 A RELOCATION 

9502 044672 005726 TST (SP )+ sPOP THE STACK 

9503 044674 022767 000001 136074 CMP @1,FLAG s0ID0 AN ABORT OCCUR 

9504 044702 001401 BEQ 2s sNO GO ON 

9505 044704 104002 ERROR +2 sMMU ERROR 

9506 sYES GO TO ERROR 

9507 044706 005067 136064 2s: CLR FLAG ;CLEAR MMU ABORT FLAG 

9508 044712 000207 RTS PC ;RE TURN 

9509 3 

9510 044714 TLIFIN: 

9511 044714 TSMM12: 

9Sile : MMR1 FUNCTIONAL TEST 

9513 044714 005037 177572 CLR 90177572 sMMU OFF 

9514 044720 005067 136052 CLR FLAG ;CLEAR MMU ABORT FLAG 

9515 044724 005067 136056 CLR SAVMR1 sCLEAR STATUS REG SAVE AREA 
9516 044730 004767 66200 JSR PC MMU sINIT MMU 

9517 044734 012737 030000 177776 MOV 930000 ,80177776 sINIT PSW 

9518 044742 012704 100200 MOV #100200 ,R4 sSETUP TEST LOCATIONS 

9519 044746 010401 MOV R4,R1 : 

9520 044750 (612705 100101 MOV #100101,R5 ; 

9521 044754 010502 MOV RS ,R2 ; 

9522 044756 012737 000020 172516 MOV €20,80172516 s INIT MMR3 

9523 044764 012737 077402 172310 MOV 077402 ,09172310 sSETUP KIPOR4 TO ABORT 

9524 044772 012703 006414 MOV 06414,R5 ;SETUP EXPECTED DATA FOR MMR1 
9525 044776 012767 000001 135772 MOV #1,FLAG sSETUP FLAG FOR AN ABORT 

9526 045004 012737 000001 177572 MOV #1,980177572 ;TURN MMU ON 

9527 045012 010767 135744 MOV R?,SLOCOO sSAVE PC 

9528 045016 112425 MOVB (R4)+,(RS)> 300 A RELOCATION 

9529 045020 004767 000206 JSR PC.1S12 sCHECK IF AN ABORT OCCURRED AND IF 
9530 sYES IF MMRL EQUALS EXPECTED DATA 
9531 045024 012703 175011 MOV #175011,R3 sSETUP EXPECTED DATA FOR MMR1 
9532 045030 012767 000001 135740 MOV @1,FLAG ;SETUP FLAG FOR AN ABORT 
9533 045036 012737 000001 177572 MOV #1,89177572 3 TURN MMU ON 

9534 045044 010767 135712 MOV R7,SLOCOO sSAVE PC 


9535 045050 112142 MOVB CR1)>, -CR2) :D0 A RELOCATION 


COKDABO KOJ11- 8 CLUSTER MACY1L1 
OS -APR-84 16:45 


COKDAB.P 11 


004 767 


012703 
012767 
012737 
010767 
114125 
004767 


012703 
012767 
012737 
010767 
112125 
004767 


012703 
012767 
012737 
010767 
012542 
004767 


012703 
012767 
012737 
010767 
014225 
004767 


000167 


022767 
001401 
104002 


020367 
001401 
104002 


026767 
001401 
104002 


005067 
005067 
000207 


000240 


171025 
000001 


000001 
135574 


000036 
012762 
000001 
000001 
135542 


000004 


000046 


135536 
135502 


135514 
135512 


30( 1046) 


135706 
177572 


135654 
177572 


135622 
177572 


135570 
177572 


135536 


135526 


05 - APR - 84 


F14 


16:45 PAGE 1/75 


MEMORY MANAGEMENT TESTS 


JSR PC,1S1le2 sCHECK IF AN ABORT OCCURRED AND IF 
sYES IF MMR1 EQUALS EXPECTED DATA 
MOV 06771,R3 sSETUP EXPECTED DATA FOR MMR1 
MOV 1,FLAG 3;SETUP FLAG FOR AN ABORT 
MOV #1,80177572 3 TURN MMU ON 
MOV R7,SLOCOO sSAVE PC 
MOVB -(R1),CRS)+ 300 A RELOCATION 
JSR PC,1S12 ;CHECK IF AN ABORT OCCURRED AND IF 
sYES IF MMR1 EQUALS EXPECTED DATA 
MOV 96411,R3 sSETUP EXPECTED DATA FOR MMR1 
MOV #1,FLAG ;SETUP FLAG FOR AN ABORT 
MOV #1,80177572 3 TURN MMU ON 
MOV R7,SLOCOO sSAVE PC 
MOVB (R1)+,CRS)-> 300 A RELOCATION 
JSR PC,TS12 sCHECK IF AN ABORT OCCURRED AND IF 
;YES IF MMR1L EQUALS EXPECTED DATA 
MOV 171025,R3 sSETUP EXPECTED DATA FOR MMR1 
MOV #1,FLAG ;SETUP FLAG FOR AN ABORT 
MOV 41,80177572 3; TURN MMU ON 
MOV R7,SLOCOO sSAVE PC 
MOV CR5)+, -CR2) 300 A RELOCATION 
JSR PC .TSi2 sCHECK IF AN ABORT OCCURRED AND IF 
;YES IF MMR1 EQUALS EXPECTED DATA 
MOV #12762 ,R3 sSETUP EXPECTED DATA FOR MMR1 
MOV #1,FLAG ;SETUP FLAG FOR AN ABORT 
MOV #1,80177572 3; TURN MMU ON 
MOV R7,SLOCOO sSAVE PC 
MOV -(R2),CR5)> 300 A RELOCATION 
JSR PC.TSle2 ;CHECK IF AN ABORT OCCURRED AND IF 
YES IF MMR1 EQUALS EXPECTED DATA 
JMP TLOF IN 
3 
sROUTINE TO CHECK IF AN ABORT OCCURRED AND IF MMR1 EQUALS EXPECTED DATA 
3 
TSle: CMP 90,FLAG :0I0 AN ABORT OCCUR 
BEG 1$ 3YES GO ON 
ERROR +2 ;MMU ERROR 
sNO GO TO ERROR 
1$: CMP R3,SAVMR1 ; TEST MMR1L FOR EXPECTED DATA 
BEQ 2s ;0K GO ON 
ERROR +2 ;MMU ERROR 
sNO GO TO ERROR 
2s: CMP SLOCOO, SAVMR2 ; TEST MMR2 FOR EXPECTED DATA 
BEQ 3$ ;0K GO ON 
ERROR +? 3MMU ERROR 
sNO GO TO ERROR 
3$: CLR SAVMR1 ;CLEAR STATUS REG SAVE AREA 
CLR SAVMR2 3 
RTS PC ;RETURN 
3 
T12F IN: NOP 
TSMM13; 
3 ADDER RELOCATION TEST PART A 


FESS SSHSSHASHEHHHHEHHEAHEEHEEESSESHEEHESEHHEHSEHHEHESHE HEHEHE EHEHEEH HEHEHE EOE 


;(NEED 16 BITS OF MEMORY ADDRESSING) 


SEG 0174 


COKDABO KDJ11-8 
COKDAB.P11 05 - APR 


CLUSTER 
-84 


172240 
177642 
172252 
177640 
172242 
172254 
177652 
177644 
172246 


MACY11 30( 1046) 
16:45 


177572 


172516 


177776 


000001 177572 


177572 


000111 


177776 


000027 
000001 


172516 
177572 


177572 


000202 


OS - APR - 84 


G14 


16:45 PAGE 176 


MEMORY MANAGEMENT TESTS 


1$: 


3$: 


4$: 


80177572 


020,90 172516 
@PARAD1,R3S 
@PARVA1,R1 
(R1)+,aC(R3)> 
ee 


oPHY1,R3 
#vIR1,R1 
MODE 1 ,R2 
C(R2)+,80177776 
@C(R%)+,RS 
@1,@@177572 
a(R1)- 
(SP)+,R4 
8¢177572 

RS ,R4 


(R2)+,80177776 
aC R3)+,RS 
$27,80172516 
#1,30177572 


T13F IN 


; 
;ADDER TEST PART A TABLES 


PARAD1: 


. WORD 
. WORD 


172240 
177642 
172252 
177640 
172242 
172254 
177652 
177644 
172246 


sMMU OFF 

;CLEAR MMU ABORT FLAG 

sINIT PSw 

sINIT MMU 

s INIT MMR3 

sSETUP PARS WITH TEST VALUES 
¢ 

Hy 

3 


D 
;SET POINTERS TO ACDER PART A 
; TEST TABLES. 


3 

;INIT PSw 

sSAVE DATA AT PHYSICAL ADDRESS 

3; TURN MMU ON 

— DATA AT RELOCATED VIRTUAL ADDRESS 


; TURN MMU OFF 
:1S DATA EQUAL TO EXPECTED 
3YES GO ON 


3MMU ERROR 
sNO IT IS AN ADDER ERROR 


sARE WE READY TO TEST DATA SPACE 
sNO GO TO 2$ 

sPOINT TO DATA SPACE VALUES 

; 


}INIT PSw 

sSAVE DATA AT PHYSICAL ADDRESS 

sINIT MMR3 

;TURN MMU ON 

sSAVE DATA i RELOCATED VIRTUAL ADDRESS 


OFF 
3IS DATA EQUAL TO EXPECTED 
;YES GO ON 


3MMU ERROR 
sNO IT IS AN ADDER ERROR 


SEG 0175 


H14 


COKDABO KDJL1 8 CLUSTER MACY11 50(1046) O5-APR-84 16:45 PAGE 177 


COKDAB.P 11 05 -APR-84 16:45 MEMORY MANAGEMENT TESTS SEQ 0176 
9048 045526 177654 -WORD 177654 
9649 045530 172250 WORD 172250 
9650 045532 177660 -WORD 177660 
9651 045534 000333 -WORD 333 
9652 045536 000000 PARVAL: .WORD 
9653 045540 000010 -WORD 000010 
9054 045542 177777 «WORD 177777 
9655 045544 177601 «WORD 177601 
9656 045546 000010 WORD 000010 
9657 045550 000052 «WORD 000052 
9658 045552 000070 ° D0 000070 
9059 045554 000010 «WORD 000010 
9660 045556 000010 «WORD 000010 
9661 045560 000060 WORD 000060 
9662 045562 000000 . WORD 
9663 045564 000010 WORD 000010 
9664 045566 000333 -WORD 333 
9665 045570 000000 VIR1: . WORD 
9666 045572 025000 -WORD 025000 
9667 045574 135224 WORD 135224 
9668 045576 017700 «WORD 017700 
9669 045600 033000 -WORD 033000 
9670 045602 145252 «WORD 145252 
9671 045604 121000 -WORD 121000 
9672 045606 043000 -WORD 043000 
9673 045619 075000 -WORD 075000 
9674 045612 142000 -WORD 142000 
9675 045614 117700 «WORD 117700 
9670 045616 000111 «WORD 111 
9677 007000 -WORD 007000 
9678 045622 000000 PHYL: . WORD 
9679 045624 006000 . WORD 
9680 045626 015124 -WORD 015124 
9681 045630 . WORD 
9682 045632 014000 -WORD 014000 
9683 045634 012452 -WORD 012452 
9684 045636 010000 DBD 010000 
9685 045640 004000 WORD 004000 
9686 045642 016000 «WORD 016000 
9687 045644 010000 -WORD 010000 
9688 045646 017700 ‘ D 017700 
9689 045650 000111 -WORD 111 
9690 045652 010000 «WORD 010000 
9691 045654 010000 MODE1: .WORD 010000 
9692 045656 030000 -WORD 030000 
9693 045660 010000 -WORD 010000 
9694 045662 030000 WORD 030000 
9695 045664 010000 WORD 010000 
9696 045666 010000 WORD 010000 
9697 045670 030000 WORD 030000 
9698 045672 030000 WORD 030000 
9699 045674 010000 WORD 010000 
9700 045676 030000 -WORD 030000 
9701 045700 010000 WORD 010000 


. 111 
9703 045704 030000 -WORD 030000 


114 


COKDABO KDJ11 B when MACY11 30(1046) O5-APR-84 16:45 PAGE 178 


COKDAB.P11 O5-APR-84 16:45 MEMORY MANAGEMENT TESTS SEG 0177 
9704 H 
9705 045706 TI3F IN: 
9706 045706 7S$182e2: 
9707 ry TEST 22/18 BIT ADDRESS OPTION 
9708 FL FFAASAHSAASAAEEESAEEERESEAOESEEEEEEDESEERESEEEEEEEEASERELERECE RSE 
9709 sCHECK THE SOFTWARE SWITCH REGISTER TO DETERMINE IF THIS IS A 22 BIT OR AN 
9710 318 BIT ADDRESS SYSTEM. BIT O8 IN THE SWR=1 INDICATES AN 18 BIT SYSTEM. 
9711 ;IF WE'RE IN A 22 BIT SYSTEM WE CAN PERFORM SOME EXTRA TESTS. 
9712 045706 032777 000400 133224 BIT oBITO8,aSWR :IS BIT O08 SET? 
9713 045714 001405 BEQ 100$ ;BRANCH IF ITS NOT 
9714 045716 062737 000001 001204 ADD #1,@0@$TESTN sKEEP TEST NUMBERS IN ORDER 
9715 sADD 1 FOR THE TESTS WE’‘RE SKIPPING 
4A 045724 000167 001422 JMP TLOF IN ; SKIP OVER THESE TESTS IF IT IS 
717 ; 
4h +6 THIS IS A 22 BIT SYSTEM CHECK THE 22/18 BIT ADDRESS OPTION 
7h 
9720 £10 TEST 22 BIT ADDRESSING WE DO THE FOLLOWING: 
9721 A. ENABLE 22 BIT ADDRESSING MODE 
9722 : B. CLEAR ADDRESS O 
9723 . C. WRITE PHYSICAL a 17000000 WITH ALL ONES 
9724 O. CHECK ADDRESS O 
9725 VIF ADDRESS O IS UNCHANGED (=0) OR A TIME OUT OCCURRED, IT INDICATES 
9726 3:22 BIT MODE IS FUNCTIONING. 
a $4 ;IF ADDRESS O -177777 IT — THAT 22 BIT MODE IS NOT FUNCTIONING. 
9729 045730. 013767 000004 135024 100$: MOV @04 ,SLOCOO sSAVE VECTOR 
9730 045736 013767 000006 135020 MOV a6, SLOCO1 sSAVE VECTOR 
9731 045744 012737 046024 000004 MOV #1$,904 3;SET VECTOR FOR NXM TRAP 
9732 045752 012737 000340 000006 MOV #340 ,a06 3 
9733 045760 012767 000020 124530 MOV #20,SR3 sENABLE 22 BIT MODE ADDRESSING 
9734 045766 012767 170000 124360 MOV #170000 ,KIPAR6 ;SET KIPAR6 FOR 1920-1924KW ADDR RANGE 
9735 045774 012767 000001 131570 MOV #1,SRO sENABLE MMU 
9736 046002 005067 131772 CLR 0 ;CLEAR ADOR O 
9737 046006 012737 177777 140000 MOV #177777,80140000 sMOVE ALL ONES TO ADOR 17000000 VIA KIPAR6 
9738 3A TIME OUT ERROR OR 
9739 046014 005767 131760 TST 1?) ;ADDR O REMAINING CLEAR INDICATES 
9740 ;THAT 22 BIT ADDRESS MODE IS WORKING AND 
9741 ;THAT SOME FURTHER TESTS SHOULD BE PERFORMED 
9742 046020 001405 BEQ 2s :IF ADDR O #177777 
9743 sERROR! 22 BIT ADDRESS MODE BAD 
9744 046022 104002 ERROR +2 sMMU ERROR 
9745 046024 012706 001000 1$: MOV #STBOT,SP ;GOT HERE AS A RESULT OF NXM TRAP-.-- 
9746 ;CLEAN UP THE STACK 
9747 046030 005037 177766 CLR 89177766 ;CLEAR CPU ERROR REGISTER 
9748 046034 012737 046074 000004 23: MOV #3$,904 ;SET UP VECTOR FOR NXM TRAP 
3749 046042 042767 000020 124446 BIC “BITO4,SR5 ;SET 18 BIT ADDRESSING MODE IN SR3 
9750 046050 012767 170000 124276 MOV #170000 ,KIPARS ;SET KIPAR6 SO THAT BITS 18-21 SHOULD 
9751 ;BE ASSERTED IF 22 BIT ADR WAS ENABLED 
9752 046056 012737 177777 140000 MOV #177777,80140000 ;TRY TO WRITE ADOR 17000000 VIA KIPARS 
9753 sADOR O SHOULD = 177777. A TIME OUT 
9754 046064 022737 177777 000000 CMP #177777,a00 3;OR ADDR O = ZERO INDICATES AN ERROR 
9755 046072 001403 BEQ 4$ 3;GO TO NEXT TEST IF ADDR OFlL7 7777 
9756 046074 005067 131472 3$; CLR SRO ;DISABLE MMU BEFORE ERROR. 
9757 sERROR! 18 BIT ADOR OPTION [S N.G. 
9758 046100 104002 ERROR 2 ;MMU ERROR 
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9760 
97el 
9762 
9763 
9764 
9765 
9766 
9767 
9768 
9769 
9770 
9771 
9772 
o773 
9774 
9775 
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012737 
005067 
01276? 
012737 
005767 
001403 
005067 
104002 


012737 
005067 
012767 
012737 
005767 
001403 
005067 
104002 


005067 
005037 
012706 
013737 
013737 


005037 
005067 
013737 
013737 
012737 
012737 


16:45 


177777 
131574 


131360 
046256 
131552 


040000 
177777 
131532 


131316 
046320 
131510 
100000 


177777 
131470 


131254 


131246 


177572 
131406 
000004 
000006 
047064 
000340 


30( 1046) 


124406 
131666 


124224 
140000 


000004 


124162 
140000 


000004 


124120 
140000 


000004 


124056 
140000 


000004 
000006 


002762 
002764 


000004 . 
000006 


i] 4 
05-APR-84 16:45 PAGE 179 
MEMORY MANAGEMENT TESTS 


;TEST ADDRESS BITS 18 THRU 21 
5 


4s: BIS oBITO04,SR3 sENABLE 22 BIT — MODE 
MOV #5$,4 sSET UP FOR NXM T 
CLR t°) sCLEAR ADDRESS O 
MOV #10000 ,KIPAR6 sTEST ADORESS BIT 18 
MOV #177777,80140000 sWRITE ALi ONES TO ADDR 1000000 
TST te) sTEST ADDRESS 0. SHOULD = ZERO 
BEQ S$ sBRANCH IF ADDRESS 0-0 
CLR SRO sDISABLE MMU BEFORE ERROR 
ERROR +2 3MMU ERROR 
sERROR! BIT 18 DID NOT ASSERT 
S$: MOV %6$ ,904 ;SET UP FOR NXM TRAP 
CLR ie) ;CLEAR ADOR O 
MOV #20000 , KIPAR6 sTEST ADDRESS BIT 19 
MOV #177777,30140000 sWRITE ALL ONES TO ADDR 2000000 
TST ° 3 TEST ADDR O. SHOULD= ZERO 
BEQ 6$ ;BRANCH IF ADORESS 0-0 
CLR sro ;DISABLE MMU BEFORE ERROR 
ERROR +2 3MMU ERROR 
sERROR! BIT 19 DID NOT ASSERT 
6$: MOV #7$,904 ;SET UP FOR NXM TRAP 
CLR 0 sCLEAR ADOR O 
MOV #40000 , KIPAR6 ;TEST ADDRESS BIT 20 
MOV #177777,80140000 sWRITE ALL ONES TO ADDR 4000000 
TST ie) sTEST ADDR O. SHOULD =O 
BEQ 7$ sBRANCH IF ADDRESS O =0 
CLR SRO sOISABLE MMU BEFORE ERROR 
ERROR +2 3MMU ERROR 
sERROR! BIT 20 DID NOT ASSERT 
7$; MOV 083,204 ;SET UP FOR NXM 
CLR c¢) ;CLEAR ADDRESS 0 
MOV #100000 ,K IPAR6 ;TEST ADDRESS BIT 21 
MOV #177777,380140000 sWRITE ALL ONES AT ADDR 10000000 
TST 0) sCHECK ADDRESS 0. SHOULD = 0 
BEQ 8s ;BRANCH IF ADDR O = O 
CLR SRO sDISABLE MMU BEFORE ERROR 
ERROR +2 3MMU ERROR 
sERROR! ADOR BIT 21 DID NOT ASSERT 
8$: CLR SRO sOISABLE MMU 
CLR 89177766 ;CLEAR CPU ERROR REGISTER 
MOV @STBOT ,R6 sRESET STACK POINTER 
MOV @#SLOCOO ,ae4 sRESTORE VECTORS 
MOV @#SLOCO1 ,a%6 H 
TSMM14: 
; ADDER RELOCATION TEST PART B 


FF FSSHSSHEHHAHSESEHESEHEAHAHAESEHESAEHAESCHESHEHESEASESESEEHSEAHEHEEHAAEHEEEEED 


s(NEED 22 BITS OF MEMORY ADDRESSING) 


CLR aeSRO 

CLR CPEREG 

MOV 84 ,8¢SLOCOO 
MOV a6 ,8?SLOCO1 
MOV ONXMTRP , a4 


MOV #340, a6 


3TURN OFF MMU, 

;CLEAR THE CPU ERROR REGISTER 
sSAVE LOC 4 IN SLOCOO. 

sSAVE LOC 6 IN SLOCOL. 

;SET UP FOR TIMEOUT TRAP 

;SET UP FOR TIMEOUT TRAP 


SEQ 0178 


K14 
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COKDAB.P11 05-APR-84 16:45 MEMORY MANAGEMENT TESTS SEQ 0179 
9816 046410 005037 172340 CLR aK IPARO ;SET KER PARO FOR 1ST 4KW OF MEMORY. 
9817 046414 012767 077406 123656 MOV #77406 ,KIPDRO 3;SET KER POR FOR 4KW R/W ACCESS. 

9818 046422 012737 177500 172354 MOV #177500, a0K IPAR6 ;SET UP KERNEL PAGE ADDR REG 6 

9819 sFOR HIGHEST 4K WORDS OF NON-1/0 

9820 sFOR 2 MEG WORDS OF MEMORY 

9821 046430 012767 077406 123656 MOV #77406 ,KIPDR6 ;SET KER PDOR6 FOR 4kKW R/W ACCESS. 

9822 046436 012737 000020 172516 MOV #20, a0SR3 s ENABLE . ay ADDRESSING. 

9823 046444 012737 000001 177572 MOV #1,8¢@SRO ;TURN ON THE MMU. 

9824 046452 005737 157776 TsT 84157776 sATTEMPT TO ADDRESS LAST MEMORY ADDR. 

9825 peeeeseseoaaeeWILL TRAP TO 4 IF 2 MEG WORDS OF MEMORY NOT AVAILABLE sacescess 

9826 046456 013737 002762 000004 MOV @¢SLOCOO ,a04 sRESTORE LOC 4 

9827 046464 013737 002764 000006 MOV a#SLOCO1 ,a#6 sRESTORE LOC 6 

9828 046472 005037 177572 CLR 84177572 sMMU OFF 

9829 046476 005037 002776 CLR @e¢FLAG ;CLEAR MMU ABORT FLAG 

9830 046502 004767 064426 JSR PC ,MMU sINIT MMU 

9831 046506 012737 010000 177776 MOV #10000 ,80177776 ; INIT PSW 

9832 046514 012737 000020 172516 MOV #20,80172516 s INIT MMR3 

9833 046522 052737 001000 177746 BIS #1000 ,8#0177746 3; TURN CACHE TEST FEATURE ON 

9834 046530 012704 047266 MOV @PARVAS ,R4 3;SET POINTERS TO INIT TABLES 

9835 046534 012701 047320 MOV #VIR3,R1 H 

9836 046540 012437 172246 1$: MOV (R4)+ 80172246 sINIT SIPAR3 

9837 046544 012737 000001 177572 MOV #1,80177572 ; TURN MMU ON 

9838 046552 012746 125252 MOV #125252, -( SP) ;PUSH BACKGROUND DATA ON TO THE STACK 

9839 046556 006671 000000 . MTPI a0(R1) WRITE DATA TO PHYSICAL ADDRESS 

9840 046562 006531 MFPI acR1i)-+ sWRITE DATA AT PHYSICAL ADDRESS TO STACK 

9841 046564 022726 125252 CMP #125252,(SP)+ 3IS DATA EQUAL TO EXPECTED 

9842 046570 001403 BEQ 2s :YES GO ON 

9843 046572 005037 177572 CLR 87177572 ; TURN MMU OFF 

9844 046576 104002 ERROR 2 sMMU ERROR 

9845 sNOT EQUAL GO TO ERROR 

9846 046600 005037 177572 2s: CLR a#177572 3; TURN MMU OFF 

9847 046604 021427 000333 CMP (R4), 0333 sARE WE wr 

9848 046610 001353 BNE 1$ :NO GO TO 1 

9849 046612 012704 047150 MOV #PARVA2 ,R4 ‘me POINTERS TO PAR INIT TABLES 

9850 046616 012701 047116 MOV #PARAD2,R1 . 

9851 046622 012431 3$: MOV CR4)+,ACR1)>+ FINIT PARS 

9852 046624 021127 000333 CmP (R1), #333 ;ARE WE DONE 

9853 046630 001374 BNE 3$ sNO, GO TO 3$ 

9854 046632 012704 047234 MOV #MODE2 ,R4 3;SET POINTERS TO ADDER PART 8B TABLES 

9855 046636 012701 047202 MOV #VIR2,R1 3 

9856 046642 012702 047266 MOV #PARVAS,R2 3 

9857 046646 012703 047320 MOV #VIR3,R3 ; 

9858 046652 004767 000076 4s; JSR PC,17S14 ;WRITE DATA TO PHYSICAL ADORESS AND THEN 

9859 ;CHECK IF DATA AT PHYSICAL ADDRESS IS 

9860 sEQUAL TO EXPECTED AND IF NOT DETERMINE 

9861 ;IF IT IS AN ADDER ERROR OR A MEMORY ERROR 

— 046656 021127 000111 CMP CR1), #111 ee Bg DONE ALL THE 22 BIT MODE I SPACE 
; 

9864 046662 001373 BNE 4$ ;NO GO TO 4$ 

9865 046664 005201 INC R1 sPOINT TO 22 SIT MODE D SPACE CASE 

9866 046666 005201 INC R1 3 

9867 046670 005204 INC R4 H 

9868 046672 005204 INC R4 3 

9869 046674 012737 000027 172516 MOV #27,80172516 s INIT MMR3 

9870 046702 012437 177776 MOV (R4)+ 80177776 s INIT PSW 


9871 046706 012746 052525 MOV #52525, -( SP) sPUSM DATA ONTO STACK 
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046712 
046720 
046722 
046726 
046734 


046740 
046744 


046750 


CLUSTER 
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012737 


000167 


012437 
012737 


005037 
000006 


177646 


MACY11 30( 1046) vain tates 


16:45 
000001 


177572 
000020 
000040 


172516 
000004 


000376 


177776 
000001 
052525 


177572 
010000 
172246 
000001 


000000 
052525 


000000 
125252 


177572 


177572 
047352 
002762 
002764 
177766 


177572 


172516 


177572 


177776 
177572 


000006 


L14 
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MORY MANAGEMENT TESTS 


MOV 
MTPD 
CLR 
MOV 
JSR 


CLR 
JSR 


JMP 


#1,90177572 
aC R1)+ 
a¢177572 

#20 ,8#172516 
PC,114 


84172516 
PC,1TS14 


TISF IN 


; TURN MMU ON 

;WRITE DATA TO PHYSICAL ADDRESS 

3; TURN MMU OFF 

;INIT MMR3 

sCHECK IF DATA AT PHYSICAL ADDRESS IS EQUAL 
;TO EXPECTED AND IF NOT DETERMINE IF IT 
:IS AN ADDER ERROR OR A MEMORY ERROR 

s INIT MMR3 FOR 18 BIT MODE 

sWRITE DATA TO PHYSICAL ADDRESS AND THEN 
;CHECK IF DATA AT PHYSICAL ADDRESS IS 
sEQUAL TO EXPECTED AND IF NOT DETERMINE IF 
;IT IS AN ADDER ERROR OR A MEMORY ERROR 


in 

sROUTINE TO WRITE DATA TO PHYSICAL ADDRESS AND TO CHECK IF DATA AT 
sPHYSICAL ADDRESS IS EQUAL TO EXPECTED AND IF NOT DETERMINE IF IT IS 
;AN ADDER ERROR OR A MEMORY ERROR 


3 
TS14; MOV 


714: MOV 


1$: ERROR 
2s: CLR 


(R4)+,80177776 
#1,89177572 
#52525, -(SP) 


#10000 ,80177776 
(R2)+, 8172246 
$1,980177572 
a0(R3) 
on ae 


a@0(R3) 
+ nce iiieatiet 
1 


+2 


2s 
+2 


8177572 
R3 


R3 
PC 


sINIT PSw 

3; TURN MMU ON 

s;WRITE DATA ONTO STACK 
s;WRITE DATA TO PHYSICAL ADDRESS VIA STACK 
3;TURN MMU OFF 

; INIT PSW 

s INIT SIPARS3 

; TURN MMU ON 

300 RELOCATION 

:;IS DATA EQUAL TO EXPECTED 
:;YES GO ON 

;WHAT TYPE OF ERROR IS IT 
3 


é 
;MMU ERROR 
;IT IS A MEMORY ERROR 


3 

;MMU ERROR 

;IT IS AN ADDER ERROR 
3; TURN MMU OFF 
3 


‘ 
;RETURN 


‘ 
sNON-EXISTANT MEMORY TRAP ROUTINE 


é 

NXMTRP: CLR 
MOV 
MOV 
MOV 
CLR 


RTT 


a¢SRO 
#T14FIN,(SP) 
@#SLOCOO , a#4 
@#SLOCO1, ae6' 
a¢177766 


‘ 
;ADDER TEST PART B TABLES 


‘ 
PARAD2: .WORD 


177646 


;TURN OFF MMU, 

_3SET UP STACK WITH RETURN ADDR. 
sRESTORE LOC 4 
sRESTORE LOC 6 
;CLEAR TIME OUT INDICATION FROM 
;CPU ERROR REGISTER. 
;RETURN FROM TRAP; GO TO NEXT TEST. 


SEG 0180 


M14 
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9928 047120 177650 .WORD 177650 
9929 047122 177652 [WORD 177652 
9930 047124 172240 .WORD 172240 
9931 047126 177640 .WORD 177640 
9932 047130 177642 .WORD 177642 
9933 047132 172244 .WORD 172244 
9934 047134 177644 .WORD 177644 
9935 047136 172252 .WORD 172252 
9936 047140 172352 .WORD 172352 
9937 047142 177662 .WORD 177662 
9938 047144 172242 WORD 172242 
9939 047146 000333 .WORD 333 

9949 047150 157700 PARVA2: .WORD 157700 
9941 047152 137700 .WORD 137700 
9942 047154 077700 .WORD 077700 
9943 047156 176777 .WORD 176777 
9944 047160 007600 .WORD 007600 
9945 047162 167700 .WORD 167700 
9946 047164 175700 .WORD 175700 
9947 047166 177425 .WORD 177425 
9948 047170 177220 .WORD 177220 
9949 047172 173700 .WORD 173700 
9950 047174 176700 .WORD 176700 
9951 047176 077400 .WORD 077400 
9952 047200 000333 .WORD 333 

9953 047202 070000 VIR2: .WORD 070000 
9954 047204 110000 .WORD 110000 
9955 047206 130000 .WORD 130000 
9956 047210 000000 .WORD 000000 
9957 047212 000000 .WORD 000000 
9958 047214 030000 .WORD 030000 
9959 047216 050000 .WORD 050000 
9960 047220 052524 .WORD 052524 
9961 047222 136000 .WORD 136000 
9962 047224 130000 .WORD 130000 
9963 047226 000111 WORD 111 

9964 047230 030000 WORD 030000 
9965 047232 030000 .WORD 030000 
9966 047234 030000 MODE2: .WORD 030000 
9967 047236 030000 .WORD 030000 
9968 047240 030000 .WORD 030000 
9969 047242 010000 WORD 010000 
9970 047244 030000 WORD 030000 
9971 047246 030000 .WORD 030000 
9972 047250 010000 .WORD 010000 
9973 047252 030000 “WORD 030000 
9974 047254 010000 .WORD 010000 
9975 047256 .WORD 000000 
9976 047260 000111 .WORD 111 

9977 047262 030000 WORD 030000 
9978 047264 010000 .WORD 010000 
9979 047266 160000 PARVA3: .WORD 160000 
9980 047270 140000 .WORD 140000 
9981 047272 100000 WORD 100000 
9982 047274 176770 WORD 176770 


N14 
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COKDAB.P11 
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001401 


005067 
016767 


16:45 


157776 


047422 


130110 
130300 
133270 


172354 
133370 
130404 
130164 


130334 


130310 


-WORD 170000 
-WORD 176000 
-WORD 177552 
-WORD 177400 
-WORD 174000 
-WORD 177000 
-WORD 007500 
-WORD 333 

VIR3S: -WORD 060000 
-WORD 060000 
-WORD 060000 
-WORD 060700 
-WORD 060000 
-WORD 060000 
-WORD 060000 
-WORD 060024 
-WORD 060000 
-WORD 060000 
-WORD 0f9000 
-WORD 060000 
-WORD 333 

; 

TL4F IN: 

; TEST NON-EXISTANT MEMORY TRAP 


F FFAASASARAARAEAASEEASASASEESAESEASCESESEEHEESEESESEERESHEALAEEEEEEEESRE 


;WE ARE ASSUMING THAT THE NON-EXISTANT MEMORY TIME OUT 


sFEATURE IS WORKING SINCE WE 
;THE SYSTEM BEING TESTED HAS 
sAT THIS TIME WE 


JSR 


1$: BR 


2s: CMP 


3$; CMP 


4$: CMP 


NXMFIN:: CLR 


CAN‘ T GUARANTEE THAT 
A NON-EXISTANT MEMORY LOCATION. 


WILL ATTEMPT TO TEST THE NXM FUNCTION 


PC, MMU 
#177400 , @@K IPAR6 
4,SLOCOO 


23.4 
#BITOO, SRO 
CPEREG 


PS 
8%157776 
NXMF IN 


#BITOS,CPEREG 


sINIT THE MMU 

;SET KIPAR6 TO RELOCATE TO HIGHEST MEMORY 
sSAVE VECTOR 

sLOAD VEC WITH ADOR OF TRAP HANDLER 
3TURN ON THE MMU 

;CLEAR THE CPU ERROR REGISTER 
;CLEAR THE PSW 

sACCESS Aphy g ADOR 17757776 

;IF IT DOESN'T TRAP WE'LL ASSUME 
;THAT THIS IA A 4 MEGABYTE SYSTEM 
;AND GO TO THE NEXT TEST 

1S CPU ERROR REGISTER CORRECT? 


RROR 
3IS CONTENTS OF STACK CORRECT? 


OR 

31S CONTENTS OF STACK CORRECT? 
‘ 

3MMU ERROR 


;TURN OFF THE MMU 
;CLEAR THE CPU ERROR REGISTER 
sRESTORE THE VECTOR 


SEQ 0182 


CORDABO KDILL 8B CLUSTER 
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10040 
10041 


10094 
10095 


047634 


047640 
047642 
047650 
04 7656 
047660 
04 7664 
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004 767 


022427 


MACYL1 8001046) 
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000136 


177776 
170000 
177600 
000044 


000110 


177776 
172300 
000152 


172200 
000142 


177600 
000132 


000154 


000020 
000001 


177S?e 
077506 


177776 


i 
‘ 


° 


76 


05 -APR 84 
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MEMORY MANAGEMENT TESTS 


sMMU OFF 

sCLEAR MMU ABORT FLAG 

sINIT MMU 

sINIT PSw 

35ET POINTER TO KPORS 

300 RELOCATIONS AND TEST KIPDRS FOR 
sPAGE WRITTEN BIT BEING SET AND IF 
sNOT SET GO TO ERROR 

300 RELOCATIONS AND TEST KDPORS FOR 
sPAGE WRITTEN BIT BEING SET AND IF NOT 
3SET GO TO ERROR 

s INIT PSw 

3SET POINTER TO SPORS 

300 RELOCATIONS AND TEST SIPDRS FOR 
sPAGE WRITTEN BIT BEING SET ANDO IF NOT 
3SET GO TO ERROR 

300 RELOCATIONS AND TEST SOPDRS FOR 
sPAGE WRITTEN BIT BEING SE’ AND IF NOT 
3SET GO TO ERROR 

s INIT PSwW TO A KNOWN STATE 

sINIT PSwW 

3SET POINTER TO UPDRS 

300 RELOCATIONS AND TEST UIPORS FOR 
sPAGE WRITTEN BIT BEING SET AND IF 
sNOT SET GO TO ERROR 

300 RELOCATIONS AND TEST VUDPDRS FOR 
sPAGE WRITTEN BIT BEING SET AND IF NOT 
;SET GO TO ERROR 

sINIT PSW TO A KNOWN STATE 

sSET POINTER TO KPORS 

sEXPLICITLY WRITE TO KPORS AND TEST 
sFOR PAGE WRITTEN BIT BEING CLEARED 
3ANO IF NOT CLEARED GO TO ERROR 
3SET POINTER TO SPORS 

sEXPLICITLY WRITE TO SPORS AND TEST 
sFOR PAGE WRITTEN BIT BEING CLEARED 
sAND IF NOT CLEARED GO TO ERROR 
3SET POINTER TO UPDRS 

sEXPLICITLY WRITE TO UPDRS AND TES’ 
sFOR PAGE WRITTEN BIT BEING CLEARED 
3AND IF NOT CLEARED GO TO ERROR 


DO RELOCATIONS AND TEST IPDORS FOR PAGE WRITTEN BIT BEING 


TSMML5: 
Hy PAGE WRITTEN BIT TEST 
CLR 90177572 
CLR FLAG 
JSR PC MMU 
CLR 90177776 
MOV 0172300,R4 
JSR PC,.TS15 
JSR PCc,715 
MOV 050000 ,a9177776 
MOV 9172200,R4 
JSR PC,1515 
JSR Ppc,71i5 
CLR @0177776 
MOV @170000,90177776 
MOV 0177600,R4 
JSR PC,.1S15 
JSR ec TiS 
CLR 90177776 
MOV #172300,R4 
JSR PC,TISA 
MOV @172200,R4 
JSR PC,TI5A 
MOV 9177600,R4 
JSR PC, T1I5A 
JMP TLS* IN 
a 
sROUTINE TCO 
3SET AND IF NOT SET REPORT AN ERROR 
3 
S153 CLR R1 
MOV 920 ,80172516 
1$; MOV 01,80177572 
MOV CR1L),CRL) 
CLR 80177572 
CMP (RO)+ 877508, 


:SET POINTER TO WIRTUAL ADDRESS 
s INIT MMRS 

; TURN MMU ON 

300 A RELUCATION 

s;TURN MMU OFF 

315 DATA EQUAL TO EXPECTED 


SEQ 014% 


CORDABO KD 
P11 


OKDAB 


1009 
10097 
10098 
10099 
10100 
10101 
10102 
10108 
10104 
10105 
10106 
10107 
10108 
10109 
10110 
10111 
10112 
10113 
10114 
10115 
10116 
10117 
10118 
10119 
10120 
10121 
10122 
10123 
10le4 
10125 
10126 
10127 
10128 
10129 
10130 
10131 
10132 
10133 
10134 
10135 
10136 
10137 
10138 
10139 
10140 
10141 
10142 
10143 
10144 
10145 
101446 
10147 
10148 
10149 
10150 
10151 


047670 
047672 
047674 
047700 
047704 
047706 


050076 


11 8 CLUSTE 
os R 


005037 
005037 
012704 
004767 
012737 
005037 
013746 
013746 
013746 
012737 
012737 
012737 


000002 
000027 
000001 


177572 
077506 


020000 
160000 


077406 


000020 


177572 


172516 
177572 


172516 


000010 
000014 
000016 


OS APR 84 
MEMORY MANAG 


Cl 


bean sha 


es 
+2 


#20000 ,R1 
“t panne 


PC 


OK GO ON 
:MMU ERP 
sNO GO [TO ERROR 
sPOINT TO NEXT VIRTUAL ADDRESS 
sARE WE DONE 
3NO GO TO 1$% 
RE TURN 


3 
sROUTINE TO DO RELOCATIONS AND TEST DPORS FOR PAGE WRITTEN BIT BEING SET 


sAND IF NOT 
5 
T15: CLR 


1$: MOV 


2s: ADO 


SET REPORT AN ERROR 


R1 

02,R4 
027,80172516 
01,80177572 
C(R1) 
80177572 
(R4)+ 077506 


sSET POINTER TO VIRT'JAL ADDRESS 
sPOINT 'O FIRST OPOR 


3PUSM DATA ONTO THE STACK 
300 A RELOCATION 
;TURN MMU OFF 
sIS DATA EQUAL TO EXPECTED 
30K GO ON 

sMMU ERROR 

sNO GO TO ERROR 
sPOINT TO NEXT VIRTUAL ADDRESS 
sARE WE DONE 
sNO GO TO 1$ 
sRE TURN 


3 
sROUTINE TO EXPLICITLY WRITE TO PORS AND TEST PAGE WRITTEN BIT FOR BEING 
sCLEARED AND IF NOT CLEARED REPORT AN ERROR 


3 
TISA: CLR R2 ;CLEAR COUNTER 
1$: MOV (R4),(R4) :00 AN EXPLICIT WRITE TO POR 
CMP (R4)+, 077406 31S DATA EQUAL TO EXPECTED 
BEQ 2$ ;0K GO ON 
ERROR +2 sMMU ERROR 
3NO GO TO ERROR 
2s: INC R2 ; INCREMENT POINTER 
CMP R2,020 sARE WE DONE 
BNE 1$ sNO GO TO 18 
RTS PC ;RE TURN 
TISFIN: 
3 
TSMML6: 
; TEST CSM (CALL SUPERVISOR MODE ) 
CLR ao177572 :MMU OFF 
CLR aor LAG sCLEAR MMU ABORT FLAG 
MOV OTMML6E RO ;INIT R4 
JSR PC ,MMU s INIT MMU 
MOV 037,90172516 sENABLE CSM INSTRUCTION 
CLR ao177776 sSET PS TO KER MODE 
MOV 9010, -(SP) sSAVE VECTORS 
MOV @014, -(SP) ; 
MOV ao16, (SP) - 
MOV 9TMM16B8,a010 ;SETUP NEW VECTORS 
MOV 0137,a014 : 
MOV OTMM16A,0016 ; 


SEQ 0154 


COKDABO KDI11 6 
COKDAB.P 11 0 


10152 
10153 
10154 
10155 
10156 
10157 
10158 
10159 
10160 
10161 
10162 
10163 
10164 
10165 
10166 
10167 
10168 
10169 
10170 
10171 
10172 
10173 
10174 
10175 
10176 
10177 
10178 
10179 


050104 
050106 


050110 
050116 
050124 
050132 
050134 


050136 
050144 
050152 
050156 
050160 


050162 
050170 
050176 
050202 
050210 
050214 
050222 
050224 
050226 


050230 


050234 
050242 
050250 
050252 


CLUSTER 
5 -APR 


MAC} 1 80( 1046) 


84 10:4 


907014 
104002 


012737 
012737 
012737 
007014 
104002 


012737 
012737 


012737 
012737 
012706 
012737 
012706 
012737 
000277 
007024 
104002 


000167 


042737 
022737 
001401 
104002 


005726 
005726 
000167 
042737 
022737 
001401 
104002 


005726 
005726 
000167 
042737 
022737 
001401 
104002 


005726 
005726 
000167 
156420 
104002 


000167 


050264 
000027 
140000 


050314 
000027 
177776 


000504 


007777 
000000 


177624 
007777 
030000 


177622 
007777 
000000 


177616 


000 364 


000010 
172516 
177776 


000010 
172516 


172516 
177776 


177776 
000010 


177776 
177776 


177776 
177776 


177776 
177776 


05 APR -84 
MEMORY MANAGEMENT TE‘ 


TSM16A; 


TSM16B: 


TSM16C: 


1$; 


™™M16C: 


1$: 


T™MM160: 


1$: 


TMM16E ; 
TMM16F ; 


. WORD 
ERROR 


MOV 
MOV 


DiS 


16;45 peye 184 
> 


7014 s TEST INSTRUCTION 
+2 sMMU_ ERROR 
3GO TO ERROR IF NOT TRAPPED 


OTMM16C ,8010 sSETUP NEW VECTOR 
027,80172516 sOISABLE CSM INSTRUCTION 
#140000 ,80177776 sSET PS TO USER MODE 
7014 s_ TEST INSTRUCTION 

+2 sMMU ERROR 


:GO TO ERROR IF NOT TRAPPED 


@TMM16D ,8010 sSETUP NEW VECTOR 
027,80172516 sDISABLE CSM INSTRUCTION 
@0177776 ;SET PS TO KER MODE 
7014 s TEST INSTRUCTION 
“2 ;MMU ERROR 

:GO TO ERROR IF NOT TRAPPED 
937,80172516 : sENABLE CSM INSTRUCTION 
40000 , 80177776 3SET PS TO SUP MODE 
9700,R6 sINIT SUP SP 
140000 ,80177776 sSET PS TO USER MODE 
9600 ,R6 ; INIT USER SP 
14,8010 ;SETUP NEW VECTOR 

sSET ALL CC BITS 

7024 ; TEST INSTRUCTION 
*2 3sMMU ERROR 

:GO TO ERROR IF NOT [TRAPPED 
TM16A 
97777,80177776 ;CLEAR UNWANTED BITS 
00,90177776 3IS PS CORRECT 
1$ sYES GO ON 
+2 sMMU ERROR 

3NO GO TO ERROR 
(SP )- sCLEAN UP STACK 
(SP). 3 
TSM16A sCONTINUVE TESTING 
07777,80177776 ;CLEAR UNWANTED BITs 
930000 ,a017777 :IS PS CORRECT 
1$ s1ES GO ON 
2 s™MU ERROR 

3NO GO TO ERROR 
(SP )-+ sCLEAN UP STACK 
(SP )- 8 
TSM168 sCONTINUE TESTING 
07777,a0177776 sCLEAR UNWANTED BITS 
00,a0177776 31S PS CORRECT 
1$ ;YES GO ON 
“2 3MMU ERROR 

3NO GO TO ERROR 
(SP). sCLEAN UP STACK 
(SP )- 3 
TSM16C sCONTINUE TESTING 
156430 3; TEST LOCATION 
2 3;MM ERROR 


360 TO ERROR TF DIDN'T ABORT 
TM16A 


SEQ 0185 


COKDABO KONJ1L1L B CLUSTER MACYLL 30( 1046) 
COKDAB.P11 OS -APR-84 16:45 


10208 050354 022737 070017 177776 
10209 050362 001401 
10210 050364 104002 


10212 050366 020627 000572 
10213 050372 001401 
10214 050374 104002 


10216 050376 020427 050346 
10217 050402 001401 
10218 050404 104002 


10220 050406 023727 050344 156430 
10221 050414 001401 
10222 050416 104002 


10224 050420 022627 156430 
10225 050424 001401 
10226 050426 104002 


10228 050430 022627 050226 
10229 050434 001401 
10230 050436 104002 


10232 050440 022627 140000 
10233 050444 001401 
10234 050446 104002 


10230 050450 012706 000700 

10237 050454 012737 140000 177776 
10238 050462 020627 000600 

10239 050466 001401 

10240 050470 104002 


10242 050472 012767 077400 121500 
10243 050500 012737 050346 000016 
10244 050506 012737 000001 002776 
10245 050514 012737 000001 177572 
10246 050522 010701 
10247 050524 007014 
10248 050526 022737 000000 002776 
10249 050534 001401 
10250 050536 104002 


10252 050540 023701 003010 
10253 050544 001401 
10254 050546 104002 


10256 050550 023727 003004 100041 
10257 050556 001401 
10258 050560 104002 


10260 050562 012737 000037 172516 
10261 050570 012737 040000 177776 
10262 050576 012706 000700 

10263 050602 012737 140000 177776 


Fis 
ae 
OS -APR-84 16:45 PAGE 187 
MEMORY+MANAGEMENT TESTS 


TMM16A:; CMP 970017,80177776 
BEQ 1$ 
ERROR +2 
1$: CMP R6,9572 
BEQ es 
ERROR +2 
2s: CMP R4,#TMM16E +2 
BEQ 3$ 
ERROR +2 
3 
3$; CMP @OTMMLGE , #156430 
BEQ 
ERROR 2 
4$: CMP (SP )+, #156430 
BEQ 5$ 
ERROR +2 
S$; CMP (SP )+, @TSM16D 
BEQ 6$ 
ERROR 2 
63: CMP (SP )+, #140000 
BEG 7$ 
ERROR +2 
7$; MOV 9700 ,R6 
MOV #140000 ,80177776 
CMP R6, 2600 
BEQ 8$ 
ERROR *2 
83: MOV #77400, SIPDRO 
MOV @TMM1L6F ,8016 
MOV 91,80FLAG 
MOV #1,80177572 
MOV R7,R1 
wORD 7014 
cmMP #0, OF LAG 
BEQ 9$ 
ERROR +2 
93: CMP @O*SAVMRO ,R1 
BEQ 10$ 
ERROR +2 
10$; CMP @eSAVMRO, #100041 
BEQ 11$ 
ERROR 2 
118: MOV 937,80172516 
MOV #40000 ,a0177776 
MOV #700,R6 


MOV #140000, 90177776 


sIS PS CORRECT 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
:IS SP CORRECT 
sYES GO ON 
sMMU ERROR 
sNO GO TO ERROR 
7 R4&4 CORRECT 


OR 

3IS TEST LOCATION OK 

:YES GO ON 

sMMU ERROR 

sNO GO TO ERROR 
3IS STACK CORRECT 
sYES GO ON 

sMMU ERROR 

s;NO GO TO ERROR 
31S STACK CORRECT 
3YES GO ON 

;MMU ERROR 

:;NO GO TO ERROR 
3IS STACK CORRECT 
:YES GO ON 

;MMU ERROR 

:NO GO TO ERROR 
sRESTORE SUP SP 
sSET PS TO USER MODE 
31S USER SP CORRECT 
3YES GO ON 

sMMU ERROR 

:NO GO TO ERROR 
3;SETUS SIPDRO TO ABORT 
s;SETUP VECTOR 
s;SETUP FLAG FOR AN ABORT 
3 TURN MMU ON 
sSAVE OLD PC 
; TEST INSTRUCTION 
;D0ID AN ABORT OCCUR 
;YES GO ON 

:MMU ERROR 

:NO GO TO ERROR 
;IS MMR2 CORRECT 
sYES GO ON 

;MMU ERROR 

:NO GO TO ERROR 
3IS MMRO CORRECT 
:YES GO ON 

34MU ERROR 

sNO GO TO ERROR 

sENABLE CSM 

3;SET PSw TO SUP 

sSETUP SUP SP 

sSET PSW TO USE 


SEG 0156 


ris 


COKDABO KDJ11-B8 CLUSTER MACY11 30(1046) O5-APR-84 16:45 PAGE 188 


COKDAB.P 11 O5-APR-84 16:45 MEMORY MANAGEMENT TESTS SEQ 0187 
10264 050610 012706 000600 MOV #600 ,R6 sSETUP USE SP 
10265 050614 012737 000014 000010 MOV 14,8010 sSETUP NEW VECTOR 
10266 050622 012737 050644 000016 MOV 01TS16,9016 ;SETUP NEW VECTOR 
10267 050630 000277 scc sSET ALL CC BITS 
10268 050632 007027 . WORD 7027 sTEST INSTRUCTION 
10269 050634 045712 . WORD 45712 
10270 050636 104002 TS16A: ERROR *2 ;MMU ERROR 
10271 3GO TO ERROR IF DIDN'T TRAP 
10272 050640 000167 000074 JMP TM16A 
1027 050644 022737 070017 177776 *TS16: CMP #70017,00177776 sIS PSW CORRECT 
10274 050652 001401 BEG 200% ;YES GO ON 
10275 050654 104002 ERROR +2 sMMU ERROR 
1027 :NO GO TO ERROR 
10277 050656 020627 000572 2008: CMP R6,9572 3IS SP CORRECT 
1027 050662 001401 BEQ 201$ ;YES GO ON 
10279 050664 104002 ERROR +2 ;MMU ERROR 
10280 3NO GO TO ERROR 
10281 050666 022627 045712 2018: CMP (SP)+,#45712 3IS STACK CORRECT 
10282 050672 001401 BEQ 202$ sYES GO ON 
10283 050674 104002 ERROR +2 sMMU ERROR 
10284 sNO GO TO ERROR 
10285 050676 022627 050636 2028: CMP CSP )+, @TS16A 3IS STACK CORRECT 
10286 050702 001401 BEQ 203$ 3YES GO ON 
10287 050704 104002 ERROR +2 ;MMU ERROR 
10288 :NO GO TO ERROR 
10289 050706 022627 140000 203%: CMP (SP )+, #140000 3IS STACK CORRECT 
10290 050712 001401 BEQ 204$ :YES GO ON 
10291 050714 104002 ERROR +2 ;MMU ERROR 
10292 sNO GO TO ERROR 
10293 050716 012706 000700 2043: MOV #700,R6 sRESTORE SUP SP 
10294 050722 012737 140000 177776 MOV #140000 ,80177776 sSET PSW TO USER MODE 
10295 050730 020627 000600 CMP R6, 2600 3IS USER SP CORRECT 
10296 050734 001401 BEQ TM16A ;YES GO ON 
10297 050736 104002 ERROR +2 sMMU ERROR 
10298 sNO GO TO ERROR - 
10299 050740 005037 177776 TM16A: CLR 80177776 sSET PS TO KER MOVE 
10300 050744 012637 000016 MOV (SP)+,8016 sRESTORE VECTORS 
10301 050750 012637 000014 MOV (SP )+,8014 3 
ets | 050754 012637 000010 MCV (SP)+,a#10 H 
10304 FOOSE EHEEEEEEEEEEEEEEEEEEHEEEEEEEEEEEEHEOHEEEAEEEEEEEOEEEEEESE REESE EEES 
10305 -SBTTL FLOATING POINT TESTS 
10306 FOPHOAAEHEEEEESEEEEEEEO EEE EEHESOEEEEREEEHOHEEEEEEEREEEEHEEEEEEEE EEE EEDEHOSE 
10307 3 BEGIN FLOATING POINT TESTING 
10308 §00000000000000000000000000500000000000000000000000000000000000000000080000 
10309 FORSHEE OEAEEEOSESEEEEEEE EEE EOOEOAEEHEREEEEEOHEEEEEEEREHESESEHREEEEREEEEEE 
10310 050760 MBT1: 
10311 
10312 3 FPP REGISTER BIT TESTS 
10313 SEPA EEHEEEEEEHEEEEEEEEEEEEEEEEEEOEEEEEEEEHEEHOEHEREHEEEEDEOEE 
10314 ;R5=FPP POINTER 
10315 3R1=TEMPORARY COUNTER 
10316 sR2=POINTER TO EXPECTED DATA 
10317 3R3=POINTER TO RECEIVED DATA 


10318 3R4=ODD/EVEN COUNTER 
10219 050760 17C011 SE TD 


COKDABO KNJ11-B CLUSTER MACY11 380( 1046) 


COKDAB. OS-APR-84 16:45 


10320 
10321 
10322 
10323 
10324 
10325 


Pil 


050 762 
050764 
050770 
050774 
050776 
051000 
051002 
051004 
051006 
051010 
051012 
051014 


051016 
051020 
051024 
051030 
051032 
051036 
051042 
051046 
051052 
051056 
051062 
051066 
051072 
051076 
051102 
051106 
051112 
051116 
051120 
051122 
051126 
051132 
051134 
051136 
051142 
051150 
051152 
051160 
051162 
051170 
051172 
051200 
051202 


051204 
051204 
051206 
051210 
051212 
051216 
051220 
051224 


070127 


003040 
003050 


000014 
051032 


131722 


177710 


° 131706 


177674 
131672 


131664 
131656 
131650 


000004 


131624 
000216 


131700 
131672 
131664 
131656 


G15 


sSETUP FPP ACC POINTER 
sPOINT TO TEST DATA 
sPOINT TO RECEIVED DATA 

sSETUP FPP REGISTER VALUES 


sCLEAR EXPECTED VALUE 


sSETUP FPP REGISTER VALUES 


;GET FPP AC NUMBER INTO R1 
sALLOW 10 LOCATIONS FOR OPERATION 


sSETUP JMP 


sLOAD TEST 
;SAVE TEST 
3GET OUT 
sLOAD TEST 
sSAVE TEST 
3;GET OuT 
sLOAD TEST 
sSAVE TEST 
3;GET OuT 
sLOAD TEST 
3SAVE TEST 
3GET OUT 


sLOAD TEST 
sSAVE TEST 
;GET OUT 

;LOAD TEST 
:LOAD TEST 


LOCATION 


DATA INTO 
RESULT 


DATA INTO 
RESULT 


DATA INTO 
RESULT 


DATA INTO 
RESULT 
DATA INTO 
RESULT 


DATA INTO 
REGISTER 


TEST REGISTER 


TEST REGISTER 


TEST REGISTER 


TEST REGISTER 


TEST REGISTER 


TEST XFER REGISTER 


sSTORE RESULT INTO XFER FPP REGISTER 


3GET OuT 


OS-APR-84 16:45 PAGE 189 

FLOATING POINT TESTS 

MBT2: CLR RS 
MOV #BTEXP ,R2 
MOV OBTRES,R3S 

MBT2A: CLRD ACO 
STD ACO,(R2) 
CLR R4 

BIGO: CLRD ACO 
CLRO AC1 
CLRO AC2 
CLRO AC3 
CLRO AC4 
CLLRO ACS 
MOV RS,R1 
MUL #14,R1 
ADD @MACO,R1 
JMP CR1) 

MACO: LOD BTEXP,ACO 

MACOA: STD ACO,BTRES 
JMP MACE 

MAC1: LOD BTEXP,AC1 
STO AC1,BTRES 
JMP MACE 

MAC2: LOD BTEXP,AC2 
STD AC2,BIRES 
JMP MACE 

MACS: LOO BTEXP,AC3 
STO AC3,8TRES 
JMP MACE 

- MAC4: LOO BTEXP,ACO 

STO ACO,AC4 
LOO AC4,ACO 
JMP MACOA 

MACS: LDD BTEXP,ACO 
STO ACO,.ACS 
LOD ACS,ACO 
JMP MACOA 

MACE: cme BTEXP ,BTRES 
BNE BTER 
CMP BIEXP+2,BIRES+2 
BNE BTER 
CMP BTEXP+4,BTRES+4 
BNE BTER 
CMP BTEXP+6,BTRES+6 
BEQ MBT8 

BIER: ERROR +3 


sBRANCH IF REGISTER ERROR 


3GOOD RESULT 


3FPP ERROR 
3FPP AC LOADED INCORRECTLY 


sNOW VERIFY THE OTHER REGISTERS REMAINED ZERO 
MBT8: 


CLR R1 

TST RS 

BEQ MBTBA 

CMP R5,04 

BPL MBT8A 

STO ACO,BTRES 
JSR R7,BTTST 


;CLEAR TEMPORARY COUNTER 

sSEE IF RO UNDER TEST 

;BRANCH IF TEST ING RO 

3SEE IF TESTING FPP REGISTER »R4 
sSKIP RO TESTING 

sSAVE AC TEST RESULT 

sVERIFy THAT CONTENTS REMAINED CERO 


SEQ 0188 


COKDABO KDI1i -B we te 


COKDAB.P11 


051230 
051232 


051234 
051240 
051242 
051246 
051252 
051254 


051256 
051262 
051264 
051270 
051274 
051276 


051300 
051304 
051306 
051312 
051316 
051320 


051322 
051326 
051330 
051332 
051336 
051342 
051344 


051346 
051352 
051354 
051356 
051362 
051366 
051370 


051372 
051374 
051376 
051402 
051404 
051406 
051410 
051414 
051420 
051424 
051426 


051432 
051434 
051440 
051442 


05 - API 


001401 
104003 


020527 
001406 
174167 
004767 
001401 
104003 


020527 
001406 
174267 
004767 
001401 
104003 


020527 


005205 
020527 
100016 
000167 


MACY11 3001046) 


84 16:45 


000001 


131602 
000174 


000002 


131560 
000152 


000003 


131536 
000130 


000004 


131512 
000104 


000005 


131466 
000060 


177776 


000002 
000004 
000006 


177350 


000006 
177326 


OS-APR-84 16:45 PAGE 190 

FLOATING POINT TESTS 
BEQ MBT8A 
ERROR +3 

MBT8A: CMP RS, 41 
BEQ MBT8B 
STD AC1,BTRES 
JSR R7,BTTST 
BEQ MBT8B 
ERROR +3 

MBT8B: CMP RS, #2 
BEQ MBTS8C 
STD AC2,BTRES 
JSR R7,BTTST 
BEQ MBT8C 
ERROR +3 

MBT8C: CMP RS. 93 
BEQ MB T8D 
STO AC3,BTRES 
JSR R7,BTTST 
BEQ MBT8D 
ERROR +3 

MBT8D: CMP RS, 04 
BEQ MB TBE 
LOO AC4,ACO 
STO ACO,BTRES 
JSR R7,BTTST 
BEQ MB TBE 
ERROR +3 

MBTSE: CMP RS.05 
BEQ MB TSF 
LOO ACS,ACO 
STO ACO,BTRES 
JSR R7,BTTST 
BEQ MB T 8F 
ERROR 3 

MBTSF: INC R4 
CLC 
BIC €177776,R4 
BEQ MBT8FG 
SEC 

MBT8FG: ROL C(R2) 
ROL 2(R2) 
ROL 4(R2) 
ROL 6( Re) 
BCS MBT8I 
JMP BTGO 

MBT8I: INC RS 
CMP RS, #6 
BPL MBTE 
JMP MBT2 


;BRANCH IF EXPECTED RESULT 


3FPP ERROR 


;BAD 


3FPP 
;BAD 


3;FPP 
3BAD 


3FPP 
3;BAD 


3FPP 
;BAD 


3;FPP 
;BAD 


ACO 
;SEE IF R1 UNDER TEST 
sBRANCH IF R1 UNDER TEST 
sSAVE AC TEST RESULT 
sVERIFY THAT CONTENTS REMAINED ZERO 
;BRANCH IF GOOD 
ERROR 
ACL 
3;SEE IF TESTING FPP REGISTER AC2 
sBRANCH IF R2 UNDER TEST 
sSAVE AC TEST RESULT 
sVERIFY THAT CONTENTS REMAINED ZERO 
;BRANCH IF GOOD 
ERROR 
AC2 
;SEE IF R3 UNDER TEST 
;BRANCH IF R3 UNDER TEST 
sSAVE AC TEST RESULT 
sVERIFY THAT CONTENTS REMAINED ZERO 
;BRANCH IF GOOD 
ERROR 
AC3 
sSEE IF R& UNDER TEST 
;BRANCH IF R4& UNDER TEST 
sMOVE REGISTER CONTENT 
sSAVE AC TEST RESULT 
;VERIFY THAT CONTENTS REMAINED ZERO 
;BRANCH IF GOOD 
ERROR 


AC4 ‘ 
;SEE IF RO UNDER TEST 
;BRANCH IF RO UNDER TEST 
sMOVE REGISTER CONTENTS 
sSAVE AC TEST RESULT 
sVERIFy THAT CONTENTS REMAINED ZERO 
sBRANCH IF GOOD 
ERROR 
ACS 
s INCREMENT PATTERN COUNTER 


; TEST FOR OOD /EVEN 

sBRANCH IF EVEN 

;SET CARRY FOR TEST PATTERN SHIFT 
sROTATE LSW OF TEST PATTERN 
sROTATE 2 WORD OF TEST PATTERN 
sROTATE 3 WORD OF TEST PATTERN 
sROTATE 4 WORD OF TEST PATTERN 
sJUMP IF THROUGH WITH TEST PATTERN 
sCONTINVE WITH NEW TEST PATTERN 


;GO TO NEXT REGISTER TEST 


3; SEE 


If THROUGH TESTING 


3 JUMP IF THROUGH 


;CONT 


INVE TESTING WITH NEW PATTERN 


SEQ 0189 


COKDABO KNJ11-6 
COKDAB.P11 


051446 
051452 
051454 
051460 
051462 
051466 
051470 
051474 


051476 


051476 


051476 
051500 
051502 
051504 
051510 
051514 
051522 
051530 
051536 
051544 
051550 
051552 
051556 
051562 
051564 
051570 
051574 
051600 
051604 
051610 
051614 
051620 


051624 
051630 
051634 
051636 


051640 


6B CLUSTER et! oy 30( 1046) 
O5-APR-84 16 


005767 
001010 
005767 
001005 
005767 
001002 
005 767 

207 


004567 
172467 


174067 
004567 
001401 
104003 


004567 


1351376 
131372 
131366 
131362 


131214 


131220 
000216 


000154 


131316 
131312 
131306 
131302 


O05 - APR - 84 


[15 


16:45 PAGE 191 


FLOATING POINT TESTS 


i 
é 
BITsT: TST 


BTRES sVERIFY CONTENTS AS ZERO 
BNE BITSTE sEXIT IF NOT ZERO 
TST BIRES+2 sVERIFY CONTENTS AS ZERO 
BNE BITSTE ;EXIT IF NOT ZERO 
TST BIRES+4 sVERIFY CONTENTS AS ZERO 
BNE BITSTE sEXIT IF NOT ZERO 
TST BTRES +6 ;VERIFY CONTENTS AS ZERO 
BITSTE: RTS R7 :GO BACK TO CALLING ROUTINE 
3 
3 
MBTE: 
3 
MF ACU: 
: TEST UNIQUENESS OF FPP ACCUMULATORS 


F EPORAAAERARASEAEEEEAAEEREEEEREESEAEEEDEEEEEEECEHEERED EOE EOCEEOEEES 

;THIS TEST LOADS UNIQUE PATTERNS INTO EACH ACCUMULATOR SIMUL TANEGUSLY. 
sR2=POINTER TO EXPECTED DATA 
3R3=POINTER TO RECEIVED DATA 


BFAC1: 


RO 

R4 
@BTEXP,R2 
@BTRES,R3 
#51,BTEXP 
052 ,BTEXP+2 
953,BTEXP+4 
BTEXP,ACO 


BIEXP, ACO 
ACO, AC4 
RS, SUBT 
BTEXP,AC3 
RS, SUBT 
BTEXP,AC2 
RS, SUBT 
BrEXP,AC1 
BIExP,ACO 


ACO,BTRES 
RS,BFA 
as 


RS,ADDT 


;SETUP FPP ACC POINTER 


sPOINT TO TEST DATA 
sPOINT TO RECEIVED DATA 
;SETUP EXPECTED DATA 

; 

6 


; 
sMOVE DATA TEMPORARILY 
sPUT DATA INTO TEST REGISTER 
sSUBTRACT TEN FROM EACH EXPECTED DATA 
sMOVE DATA TEMPORARILY 
sMOVE DATA INTO TEST REGISTER 
;SUBTRACT 10 FROM TEST DATA WORDS 
;STORE INTO TEST REGISTER 
;GET NEXT SET OF UNIQUE DATA WORDS 
;STORE INTO TEST REGISTER 
;GET NEXT SET OF TEST DATAS 
;LOAD TEST REGISTER 
;GET NEXT SET OF TEST WORDS 
sLOAD FINAL TEST REGISTER 
sALL REGISTER CONTAIN UNIQUE 
sSTORE ACO,RESULT 
sCHECK RESULT 
sBRANCH IF GOOD 

;FPP ERROR 

3BAD ACO 
sUPDATE EXPECTED RESULT 


TEST WORDS 


SEQ 0190 


COKDABO KNJ11-8 ee MACY11 30( 1046) 
R-84 16:45 


COKDAB.P11 


10488 
10489 


051676 


051700 
051704 
051710 
051714 
051716 


051720 
051724 
051726 
051732 
051736 
051740 


051742 
051746 
051750 
051754 
051760 
051762 


051764 


051766 
051774 
052002 
052010 
052016 
052020 
052026 
052034 
052042 
052050 


052052 
052060 
052062 
052070 
052072 
052100 
052102 
052110 


052112 


05 - AP: 
174167 


131200 
000176 


000134 
131160 
000156 


000114 
131140 
000136 


000074 


131116 
000114 


000052 


131074 
000072 


130762 
130754 
130746 
130740 


121044 
131040 
131034 
131030 


131012 


130770 
130762 
130754 
130746 


J1L5 
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FLOATING POINT TESTS 
STD AC1,BTRES 
JSR RS.BFA 
BEQ BFAC2 
ERROR +3 

BFAC2: JSR RS,ADOT 
STO AC?],BTRES 
JSR RS,BFA 
BEQ BFAC3 
ERROR +3 

BFAC3: JSR R5,ADDT 
STO AC3,B7RES 
JSR RS,BFA 
BEQ BFAC4 
ERROR +3 

BFAC4: JSR RS,ADDT 
LOD AC4,AC3 
STO AC3,8TRES 
JSR RS,BFA 
BEQ BFACS 
ERROR 3 

BFACS: JSR RS,ADDT 
LOD AcS,AC2] 
STD AC2,BTRES 
JSR RS,BFA 
BEQ BF AE 
ERROR +3 
BR BF AE 

SUBT: SUB #10,BTEXP 
SuB #10,BTEXP+2 
SUB 910, BTEXP+4 
SUB #10, BTEXP+6 
RTS RS 

ADOT: ADD #10,BTEXP 
ADD 10,BTEXP+2 
ADD #10, BTEXP+4 
ADD #10,BTEXP +6 
RTS RS 

BFA: CMP BIEXP,BITRES 
BNE BFB 
CMP BIEXP+2,BIRES+2 
BNE BFB 
CMP BIEXP+4,BTRES+4 
BNE BFB 
CMP BTIEXP+6,BTRES+6 

BFB: RTS RS 

BF AE: 


3;FPP 
;BAD 


3;FPP 
3;BAD 


sSTORE AC1 RESULT 
;CHECK RESULT 
sBRANCH IF GOOD 

ERROR 

RESULT AC1 
sUPDATE EXPECTED RESULT 
sSTORE AC2 RESULT 
;CHECK RESULT 
;BRANCH IF GOOD 

ERROR 

AC2 RESLUT 
sUPDATE EXPECTED RESULT 
sSAVE TEST RESULT 
;CHECK RESULT 
;BRANCH IF GOOD 

ERROR 

AC3 RESULT 
sUPDATE EXPECTED RESULT 
;SAVE TEMPORARY 
sSTORE AC4 RESULT 
s;CHECK RESULT 
;BRANCH IF GOOD 

ERROR 

AC4 RESULT 
sUPDATE EXPECTED RESULT 
;SAVE TEMPORARY COPY 
sMOVE ACS RESULT 
;CHECK RESULT 
;BRANCH IF GOOD 

ERROR 

ACS RESULT 
sEXIT MODULE 


sUPDATE EXPECTED 
sUPDATE EXPECTED 
sUPDATE EXPECTED 
sUPDATE EXPECTED 


sUPDATE EXPECTED 
sUPDATE EXPECTED 
sUPDATE EXPECTED 
sUPDATE EXPECTED 


sVERIFY CONTENTS 
sEXIT IF NOT ZERO 
;VERIFY CONTENTS 
sEXIT IF NOT ZERO 
sVERIFY CONTENTS 
sEXIT IF NOT ZERO 
sVERIFY CONTENTS 


CONTENTS 
CONTENTS 
CONTENTS 
CONTENTS 


CONTENTS 
CONTENTS 
CONTENTS 
CONTENTS 


3GO BACK TO CALLING ROUTINE 


SEQ 0191 


KiS 
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COKDAB.P11 


0S2112 


052112 
052116 
052122 
052126 
052132 
052136 
052142 
052146 
052150 


052172 
052174 


052176 


052176 
052202 
052206 
052212 
052216 
052222 
052226 
052232 
052234 


052240 
052244 
052246 
052250 
052254 
052260 


052262 
052264 


052266 
052270 


052270 
052270 


O05 - APR - 84 


005037 


16:45 


000024 


177776 
177760 


133436 


FLOATING POINT TESTS 


TSFPL: 
3 


3 
LOST: 


3 
TSF: 


ak LOFPS AND STFPS MODE 0 


aeTRPFLG ;CLEAR TRAP FLAG 
MOV #147757 ,R4 ;SETUP DATA TO BE LOADED 
JSR PC,LOST 3;LOAD AND STORE FPS WITH DATA 
MOV #105252 ,R4 ;SETUP DATA TO. BE LOADED 
JSR PC,LOST 3;LOAD AND STORE FPS WITH DATA 
MOV #42505 ,R4 ;SETUP DATA TO BE LOADED 
JSR PC,LOST 3;LOAD AND STORE FPS WITH DATA 
CLR R4 ;SETUP DATA TO BE LOADED 
JSR PC,LOST ;LOAD AND STORE FPS WITH DATA 
JMP FINI 
LOFPS R4 ;LOAD FPS WITH DATA 
STFPS R1 3;LOAD R1 WITH (FPS) 
CMP R4,R1 ;0ID THE INSTRUCTIONS WORK 
BEQ 1$ ;YES GO ON 
ERROR +3 3FPP ERROR 
;NO GO TO ERROR 
RTS '' PC ;RETURN 
NOP 
+ cFcc 
CLR a¢TRPFLG ;CLEAR TRAP FLAG 
MOV #17,R4 SETUP DATA TO BE LOADED 
JSR PC,TSF2 ;LOAD FPS AND COPY CONDITION CODES TO PS 
MOV #12,R4 ;SETUP DATA TO BE LOADED 
JSR PC,TSF2 ;LO0AD FPS AND COPY CONDITION CODES TO PS 
MOV #5,R4 ;SETUP DATA TO BE LOADED 
JSR a" TSF2 ;LOAD FPS AND COPY CONDITION CODES TO PS 
CLR ;SETUP DATA TO BE LOADED 
JSR PC, TSF2 ;LOAD FPS AND COPY CONDITION CODES TO PS 
JMP FIN2 
LOFPS R4 ;LOAD FPS 
cFrcc ;COPY CONDITION CODES TO PS 
MOV @0177776,R1 s;SAVE PS TO R1 
BIC #177760,R1 ;MASK OUT UNWANTED BITS 
CMP R4,R1 3WAS CONDITION CODE BITS TRANSFERRED 
;CORRECTLY 
BEQ 1$ :YES GO ON 
ERROR +3 3;FPP ERROR 
sNO GO TO ERROR 
RTS PC sRETURN 


TEST SETF, SETO, SETI, SETL 
CLR @eTRPFLG 


;CLEAR TRAP FLAG 


SEQ 0192 


Lis 
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COKDAB.P11 05 -APR-84 16:45 FLOATING POINT TESTS SEQ 0193 
10600 052274 012704 000200 MOV #200 ,R4 ;SETUP -DATA TO BE LOADED 
10601 052300 170104 LOFPS R4 ;LOAD FPS 
10602 052302 170001 SETF sMAKE FD=0 
10603 052304 170201 STFPS R1 sSTORE FPS 
10604 052306 020127 000000 CMP R1,%0 ;IS FO=0 
10605 052312 001401 BEQ 1$ ;YES GO ON 
10606 052314 104003 ERROR +3 ;FPP ERROR 
10607 ;NO GO TO ERROR 
10608 052316 170011 1$: SETO sMAKE FD=1 
10609 052320 170201 STFPS Ri ;STORE FPS 
10610 052322 020104 CMP R1,R4 :IS FO=1 
10011 052324 001401 BEQ es 3YES GO ON 
10612 052326 104003 ERROR +3 3FPP ERROR 
10613 ;NO GO TO ERROR 
10614 052330 012704 000100 2b: MOV #100,R4 ;SETUP DATA TO BE LOADED 
10615 052334 170104 LOFPS R4 ;LOAD FPS 
10616 052336 i70002 SETI sMAKE FL=0 
10617 052340 170201 STFPS Ril sSTORE FPS 
10618 052342 020127 000000 CMP R1,40 ;IS FL=0 
10619 052346 001401 BEQ 3$ ;YES GO ON 
10620 052350 104003 ERROR +3 ;FPP ERROR 
10621 sNO GO TO ERROR 
10622 052352 170012 3$: SETL sMAKE FL=1 
10623 052354 170201 SttPs. Ri sSTORE FPS 
10624 052356 020104 CMP R1,R4 31S FL=1 
10625 052360 001401 BEQ 4$ ;YES GO ON 
10626 052362 104003 ERROR +3 3FPP ERROR 
10627 ;NO GO TO ERROR 
10628 052364 4$: 

10629 3 

10630 052364 TSFP4: 

10631 ; TEST ILLEGAL OP CODES AND STST 

10632 052364 005037 133436 CLR aeTRPFLG ;CLEAR TRAP FLAG 

10633 052370 012705 170003 MOV #170003,R5 sINIT OP CODE 

10634 052374 013746 000244 MOV 80244, -(SP) ;SAVE FP VECTOR 

10635 052400 012737 052530 000244 MOV #ILLOP1 ,a%244 ;SETUP NEW VECTOR 

10636 052406 013746 000004 MOV a04, -(SP) sSAVE TIME OUT VECTOR 
10637 052412 012737 052600 000004 MOV @TIMEOU,a#4 ;SETUP NEW VECTOR 

10638 052420 013746 000010 MOV a?10, -(SP) ;SAVE ILLEGAL VECTOR 
10639 052424 012737 052604 000010 MOV #ILLOP2,a#10 ;SETUP NEW VECTOR 

10640 052432 005003 ; Oi: © CLR R3 ; 

10641 052434 170103 LOFPS R3 ;CLEAR FPS 

10642 052436 005002 CLR Re 3 

10643 052440 010537 052444 . MOV R5,a#D2 ;SETUP THE ILLEGAL INST 
10644 052444 000000 De: -WORD 0 3 

10645 052446 170000 D3: cFCcc sMEMORY WORDS TO BE USED WITH 
10646 052450 005202 INC Ro sEXECUTION OF ILLEGAL OP CODE 
10647 052452 005202 INC R2 H 

10648 052454 170201 STFPS = Ri ;SAVE FPS 

10649 052456 104003 ERROR +3 3;FPP ERROR 

10650 :GO TO ERROR 

10651 052460 022705 170010 D4: CMP #170010,R5 sCOMPUTE NEXT OP CODE 
10652 052424 001003 BNE DS : 

10653 052466 012705 170013 MOV #170013,R5 ; 

10654 052472 000757 BR O01 H 

10655 052474 022705 170077 DS: CMP #170077,R5 3 


M15 
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10656 052500 001001 BNE 06 ; 
10657 052502 000402 BR D7 ; 
10658 052504 005205 D6: INC RS ; 
10659 052506 000751 BR D1 ; 
10660 052510 012637 000010 D7: MOV (SP )+,a?10 sRESTORE VECTORS 
10661 052514 012637 000004 MOV (SP )+,a04 ; 
10662 052520 012637 000244 MOV (SP)+,a0244 ; 
10663 
10664 8 
peed 052524 000167 000060 JMP FING 
0666 ; 
10067 052530 022716 052446 ILLOP1: CMP #03,(SP) ;0ID TRAP OCCUR ON TEST INST 
10668 052534 001401 BEQ 1$ ;YES GO ON 
10669 052536 104003 ERROR +3 ;FPP ERROR 
10670 s;NO GO TO ERROR 
10671 052540 022626 1$: CMP (SP)+,(SP)-+ ;CLEAN UP STACK 
10672 052542 170201 STFPS RL s;STORE FPS 
10673 052544 022701 100000 CMP #100000 ,R1 31S FPS CORRECT 
10674 052550 001401 BEQ 2s ;YES GO ON 
10675 052552 104003 ERROR +3 ;FPP ERROR 
10676 ;NO GO TO ERROR 
10677 052554 005004 2s: CLR R4 ;INT R4 TO A KNOWN STATE 
10678 052556 170304 STST R4 ;STORE FEC AT RO 
10679 3;IF THE DESTINATION MODE IS IMPROPERLY 
10680 ;DECODED AN ODD ADDRESS TRAP TO 4 
10681 ;SHOULD OCCUR 
10682 052560 022704 000002 CMP #2,R4 31S FEC CORRECT 
10683 052564 001002 BNE 3$ ;NO GO TO ERROR 
10684 052566 000167 177666 JMP D4 ;YES GO ON 
10685 052572 104003 3$: ERROR +3 ;FPP ERROR 
10686 3GO TO ERROR 
eee? 052574 000167 177660 IMP D4 ;THEN GO ON 
10689 052600 104003 TIMEOU: ERROR +3 ;FPP ERROR 
pete ;ERROR BECAUSE OF TRAP TO 4 
pote) 052602 000006 RTT ;RETURN 
H 
10693 052604 104003 ILLOP2: ERROR +3 ;FPP ERROR 
10694 ;ERROR BECAUSE OF TRAP TO 10 
10695 052606 000006 RTT ;RETURN 
10696 052610 FING: 
10697 ‘ 
10698 052610 TSFPS: 
10699 ; TEST FID CINTERRUPT DISABLE BIT) 
10700 052610 005037 133436 CLR aeTRPFLG ;CLEAR TRAP FLAG 
10701 052614 013746 000244 MOV a244, -(SP) ;SAVE FP VECTOR 
10702 052620 012737 052674 000244 MOV #ILL ,@%244 ;SETUP NEW VECTOR 
10703 052626 012703 040000 MOV #40000 ,R3 ;SETUP DATA TO BE LOADED 
10704 052632 170103 LOFPS R3 ;LOAD FPS, FID=1 
10705 052634 170020 .WORD 170020 ; ILLEGAL FP INSTRUCTION 
10706 052636 170000 CFCC 
10707 052640 170201 STFPS R1 ;SEE IF ERROR WAS RECORDED IN FPS 
10708 052642 022701 140000 CMP #140000,R1 ‘eg 
10709 052646 001401 BEQ 1$ ;YES GO ON 
10710 052650 104003 ERROR +3 ;FPP ERROR 


10711 ;NO GO TO ERROR 


ay Pe 


ets 
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10712 052652 170304 1$; STST R4 ;SEE IF FEC=2 
10713 052654 022704 000002 CMP #2,R4 : 
10714 052660 001401 BEQ es ;YES GO ON 
10715 052662 104003 ERROR +3 3FPP ERROR 
10716 sNO GO TO ERROR 
iozie 052664 012637 000244 2s: MOV CSP )+,a#244 sRESTORE VECTOR 
10719 3 
rth 052670 000167 000004 JMP FINS 
1 1 3 
10722 052674 104003 ILL: ERROR +3 3FPP ERROR 
10723 sFID ERROR 
10724 052676 000006 RTT ;RETURN 
10725 052700 FINS: 
10726 3 
10727 052700 TSFP6: 
10728 3 TEST LOD, STD FSRC AND FOST MODE 
10729 052700 005037 133436 CLR aeTRPFLG sCLEAR TRAP FLAG 
10730 052704 005004 CLR R4 ; SETUP TO LOAD DATA 
10731 052706 170104 LOFPS R4 ;CLEAR FPS 
10732 052710 170011 SETD ;SET FD TO 1 
10733 052712 013746 000004 MOV a4, -(SP) sSAVE TIMEOUT VECTOR 
10734 052716 012737 053050 000004 MOV &TSF6, 204 ;SETUP NEW VECTOR 
10735 052724 012704 053040 MOV #TS6DAT ,R4 ;SETUP POINTER TO DATA 
10736 052730 172414 LOD (R4),ACO ; TEST INSTRUCTION 
10737 052732 020427 053040 CMP R4,@TS6DAT ;IS R& CORRECT 
10738 052736 001401 BEQ 1$ ;YES GO ON 
10739 052740 104003 ERRCR +3 3FPP ERROR 
10740 sNO GO TO ERROR 
10741 052742 012701 053030 1$: MOV #TS6DA,R1 ;SETUP POINTER TO DATA 
10742 052746 012703 000004 MOV #4 ,R3 s INIT COUNTER 
10743 052752 022421 2s: CMP (R4)+, CR1)-+ ;WAS SOURCE DATA ALTERED 
10744 052754 001401 BEQ 3$ 3NO ON 
10745 052756 104003 ERROR +3 3FPP ERROR 
10746 ;YES GO TO ERROR 
10747 052760 077304 3$: SOB R3.2$ ;ARE WE DONE 
10748 052762 012704 003122 MOV #TSTLOC,R4 ;SETUP POINTER FOR DATA 
10749 052766 174014 STD ACO,(R4) ; TEST INSTRUCTION 
10750 052770 0620427 003122 CMP R4,#TSTLOC ;IS R4& CORRECT 
10751 052774 0oC1401 BEQ 4$ ;YES GO ON 
10752 052776 108003 ERROR +3 3;FPP ERROR 
10753 ;NO GO TO ERROR 
10754 53000 012701 053030 4s: MOV #TS6DA,R1 ;SETUP POINTER TO DATA 
10755 053004 012703 000004 MOV #4,R3 s INIT COUNTER 
10756 053010 022421 S$: CMP (R4)+,(R1i)> :IS DESTINATION DATA CORRECT 
10757 053012 001401 BEQ 6$ ;YES GO ON 
10758 053014 104003 ERROR +3 3;F-PP ERROR 
10759 ;NO GO TO ERROR 
10760 053016 077304 63: SOB R3,5$ ;ARE WE DONE 
dng 053020 012637 000004 MOV (SP)+, ava sRESTORE VECTOR 
10763 3 
10764 053024 000167 000024 JMP FIN6 


é 
10766 053030 177777 TS6DA: .WORD 127777 
10767 053032 000000 -WORD 000000 


COKDABO KDJL1 
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10768 053034 
10769 053036 
10770 053040 
10771 053042 
10772 6053044 
10773 053046 


1077S 053050 


10°77 053052 
10778 053054 


10780 053054 


10782 053054 
10783 053060 
10784 053064 
10785 053066 
10786 053072 
10787 053100 
10788 053104 
10789 053106 
10790 053112 
10791 053114 
10792 053116 
10793 053122 
10794 053124 
10795 053130 
10795 053134 
10797 053140 
10798 057142 
10799 053146 
10800 053152 
10801 053154 
10802 053156 
10803 053160 
10804 053162 
10805 053166 
10806 053170 
10807 053174 
10808 053200 
10809 053204 
10810 053206 
10811 053212 


10814 053216 


10816 053222 
10817 053226 
10818 053230 
10819 053232 


10821 053234 
055236 


B CLUSTER MACY11 30( 1046) 
-84 16:45 


O05 - APR 
052525 
125252 
177777 


000000 
052525 
125252 


104008 


012637 


000167 


012703 
022421 
001401 
104003 


077304 
000207 


133436 
000200 


000004 
053240 
053244 
053254 


003122 


000072 
003122 
053254 


000054 
053244 


Ble 


OS APR 197 
FLOATING SPOINT 7, 16 
WORD 052525 \ 
. WORD 125252 
TS6DAT: .WORD 177777 
. WORD 000000 
. WORD 052525 
. WORD 125252 
3 
TS®6; ERROR 3 3FPP ERROR 
;0DD ADDRESS TRAP 
RTT 3RE TURN 
FIN6: 
3 
TSFP?: 
3 TEST LOD, LOF FSRC MODE O 
CLR QOTRPFLG sCLEAR TRAP FLAG 
MOV 0200 ,Ra sSETUP TO LOAD FPS 
LOFPS R4 3LOAD FPS, FD=1 
MOV 904, -(SP) sSAVE TIMEOUT VECTOR 
MOV OTSF7,a@04 3;SETUP NEW VECTOR 
MOV @TS7DA1,R4 3;SETUP POINTER TO DATA 
Lod (R4),ACO sCLEAR ACO 
MOV @TS7DA2,R1 3SETUP POINTER TO DATA 
LOO (R1),ACi sLOAD ACL WITH DATA 
LOD AC1,ACO 3s TEST INSTRUCTION 
MOV @TSTLOC,R4 3 
STD AC1,(R4) ;CHECK IF AC] HAS BEEN ALTERED 
JSR PC ,CHECK? H 
MOV 8TSTLOC RO sSETUP POINTERS FOR DATA 
MOV @TS7DA2],R1 8 
STD ACO,(R4) sCHECK IF ACO RECEIVED CORRECT DATA 
JSR PC CHECK? 3 
MOV @TS7DA1,R1 sSETUP POINTER TO DATA 
LOO (R1),AC1 ;CLEAR AC) 
SE TF 2SET FO-0 
LOF AC1,ACO s TEST INSTRUCTION 
SET 3SET FDe1L 
MOV OTSTLOC,R4 ;SETUP POINTER TO DATA 
STO AC1,(R4) sCHECK IF ACL HAS BEEN AL TERED 
JSR PC, CHECK? 3 
MOV 01570A4,R4 sSETUP POINTERS FOR DATA 
MOV @TSTLOC,R1 3 
STD ACO,(R1) sCHECK IF ACO HAS CORRECT DATA 
JSR PC, CHECK? 3 
MOV (SP )+,@04 sRESTORE VECTOR 
3 
JMP FIN? 
CHECK 7: MOV 04,R3 s INIT COUNTER 
CHE ?: CMP (R4)+¢, (RL Do :IS DATA OK 
BEQ Cri ? 3’ES GO ON 
ERROR 3 37 PP ERROR 
3NO GO TO ERROR 
CHK ?; S08 R3,CHEK? sARE we DONE 
RTS PC 3'&£S RETURN 
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10824 
10825 
10826 
10827 
10828 
10829 
10830 
10831 


10678 
10879 


058240 
053242 


053244 
053246 
053250 
053252 
053254 
053256 
053260 
053262 
053264 
053266 
053270 
05327 

053274 


053274 
053274 


053436 


053442 
054446 
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APR 84 
104008 


005037 
012704 
170104 
013746 
012737 
012704 
172414 
012701 
172511 
174100 
012704 
174114 
004767 
012704 
012701 
174014 
004767 
012701 
172511 
170001 
174100 
17€011 
012704 
174114 
004767 
012704 
012701 
174011 
004767 
012637 


000167 


0127023 
022421 


16:45 


133436 
000200 


000004 
053460 
053464 
053474 


003122 


000072 
003122 
053474 


000054 
053464 


Clo 


05 APR-84 16:45 P 198 
FLOATING POINT TESTS 
TSF ?s “ERROR 3 3— PP ERROR 
:000 ADDRESS TRAP 
RTT 3RE TURN 
3 
TS7DA1: .WORD (?) 
. WORD 0) 
.WORD 0O 
. WORD 0 
TS7DA2: .WORD 37641 
-WORD 65121 
. WORD 37373 
. WORD 22265 
TS7DA4: .WORD 
. WORD 
. WORD 37373 
. WORD 22265 
FIN?: 
3 
TSFPLO: 
3 TEST STO, STF FOST MODE 
CLR QOTRPFLG :;CLEAR TRAP FLAG 
MOV 9200 ,R4 sSETUP TO LOAD FPS 
LOFPS R4 3LOAD FPS, FDelL 
MOV a04, -(SP) sSAVE TIMEOUT VECTOR 
MOV OTSF10,804 ;SETUP NEW VECTOR 
MOV #1TS1001,R4 3SETUP POINTER TO DATA 
LOD (R4),ACO s;CLEAR ACO 
MOV @7TS1002,R1 ;SETUP POINTER TO DATA 
LOO €R1),AC1 sLOAD ACL WITH DATA 
STO AC1,ACO 3 TEST INSTRUCTION 
MOV @TSTLOC,R4 3 
STO AC1,CR4) 3;CHECK IF AC] HAS BEEN ALTERED 
JSR PC ,CHECIO 3 
MOV @TSTLOC,R4 ;SETUP POINTERS FOR DATA 
MOV #7TS$1002,R1 F 
STO ACO, (Ra) sCreCk IF ACO RECEIVED CORRECT DATA 
JSR PC ,CHEC1LO 3 
MOV ©TS1001,k1 sSETUP POINTER TO DATA 
LOD (R1),AC1 s;CLEAR ACL 
SE TF 3SET FD=0 
STF AC1,ACO 3 TEST INSTRUCTION 
SETO 3SET FDe1 
MOV @TSTLOC,R4 s;SETUP POINTER TO DATA 
STO ACI, (RO) ;CHECK IF ACL HAS BEEN AL TERED 
JSR PC. CHECIO 3 
MOV 9151004,R4 SETUP POINTERS FOR DATA 
MOV oTSTLOC,R1 3 
sto ACO,C(RL) sCHECK IF ACO HAS CORRECT DATA 
JSR PC,CHECIO 3 
MOV (SP )+,a04 sRESTORE VECTOR 
3 
JMP FINLO 
3 
CHEC1O: MOV 94 ,R3 s INIT COUNTER 
CH10;: CMP (R4)+,(R1)- sis DATA OK 


SEQ O1%7 


Dit 
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053450 
053452 


053454 
053456 


053460 
053462 


053464 
053466 
053470 
€53472 
053474 
053476 
053500 
053502 
053504 
053506 
053510 
053512 
053514 


053514 


053514 
053520 
053524 
053526 
053532 
053534 
053536 
053540 
053544 


053572 
053574 
053574 
053600 
05 3602 
053604 
053606 
053610 


052610 


001401 
104003 


077304 
000207 


104003 


077105 
020327 
001401 
104003 


000167 


177777 
177777 
177777 
177777 


000204 


000010 


rf 

TS10D1: 
™S10De: 
TS1004; 


FIN1O: 


3 
TSFPLL: 
: 


1$; 


2s: 


FINL1: 


; 
TSEP12: 


BEQ 
ERROR 


SOB 
RTS 


5S 


CHK 10 


3 


R3,CH1LO 
PC 


+YES GO ON 
3FPP ERROR 
sNO GO TO ERROR 
sARE WE DONE 
sYES RETURN 


3FPP ERROR 
s0DD ADDRESS TRAP 
8 


oe FDST SINGLE OPERAND MODE 0 


QeOTRPFLG 
9200 ,R4 

R4 
@TS1101,R4 
(R4),ACO 
ACO 


R3 
&TSTLOC,R4 


;CLEAR TRAP FLAG 
sSETUP TO LOAD FPS 
3SET FD=1 

sSETUP POINTER TO DATA 
sLOAD ALL ONES TO ACO 
: TEST INSTRUCTION 
;GET FPS 


; 
sCHEC ACO FOR ALL ZEROES 
s INIT COUNTER 


30K GO ON 

3FPP ERROR 

3NO GO TO ERROR 
;ARE WE DONE 
sCHECK FPS 
;0K GO ON 

3F PP ERROR 

3NO GO TO ERROR 


SEQ 019% 
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10936 
10937 
10938 
10939 
10940 


053610 
053614 
053620 
053622 
053624 
053626 
053630 
053634 
053636 


053640 
053644 
053646 


053650 


053732 
053736 
053742 
053744 
053746 
053750 
053754 
053756 


053760 


053764 
053770 
053772 
053774 


005037 
012703 
170103 
170407 
170204 
170305 
022704 
001401 
104003 


022705 
001401 
104003 


013746 
012737 
005037 
012702 
170102 
012705 
012704 
012724 
077503 
012702 
170412 
170203 
020227 
001401 
104003 


012701 
022227 
001401 
104003 
077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 


05-APR-84 16:45 


133436 
040200 


140200 


000002 


000004 
053770 
133436 
000200 
000004 
003122 
177777 


003122 


003122 


000004 


Flt 
O5-APR-84 16:45 PAGE 200 
FLOATING POINT TESTS 


; TEST FDOST SOP MODE O WITH ILLEGAL AC7 
CLR QOTRPFLG s;CLEAR TRAP FLAG 
MOV 940200 ,R3 sSETUP TO LOAD FPS 
LOFPS R3 sSET FID=1, AND FD-l1 
CLRD AC? s TEST INSTRUCTION 
STFPS R4 3GET FPS 
STsT RS sGET FEC 
CMP #140200 ,R4 31S FPS CORRECT 
BEQ 1$ ;YES GO ON 
ERROR 3 3FPP ERROR 
:NO GO TO ERROR 
1$: CMP #2,R5 31S FEC CORRECT 
BEQ es s¥ES GO ON 
ERROR +3 3FPP ERROR 
3NO GO TO ERROR 
2s: 
4 
TSFP13: 
3 TEST FOST SOP MODE 1 
MOV ao4, -(SP) sSAVE TIMEOUT VECTOR 
MOV OTSF13,a04 ;SETUP NEW VECTOR 
CLR aeTRPFLG ;CLEAR TRAP FLAG 
MOV #200 ,R2 ;SETUP TO LOAD FPS 
LOFPS R2 3SET FD=1 
MOV 04,R5 s INIT COUNTER 
MOV @TSTLOC,R4 s;SETUP POINTER TO TEST LOCATION 
100%: MOV 9177777,(R4)> sMOVE ALL ONES TO TEST LOCATION 
SOB R5,100$ sARE WE DONE 
MOV #TSTLOC ,R2 sSETUP POINTER TO DATA 
CLROD (R2) ; TEST INSTRUCTION 
STFPS R3 ;GET FPS 
CMP R2,e@TSTLOC sWAS R2 ALTERED 
BEQ 1$ sNO GO ON 
ERROR +3 3FPP ERROR 
:YES GO TO ERROR 
1$ MOV 44,R1 s INIT COUNTER 
es CMP C(R2)+,80 sCHECK LOCATION FOR O 
BEQ 3$ ;0K GO ON 
ERROR 3 3;FPP ERROR 
sNO GO TO ERROR 
3$: $08 R1,2$ sARE WE DONE 
CMP R3, 9204 s;CHECK FPS 
BEQ 4$ ;0K GO ON 
ERROR 3 ;FPP ERROR 
sNO GO TO ERROR 
4$ MOV (SP )+, a4 sRESTORE VECTOR 
; 
JMP FINIS 
H 
TSF13: ERROR 3 3FPP ERROK 
3000 ADDRESS In? 
RTT sRE TURN 
3 
FIN13: 


SEG 019% 


COKDABO KDJ1L1-B CLUSTER 


COKDAB.P11 


053774 
053774 


054126 


054126 
054132 
054140 
054144 
054150 
054152 
054156 
054162 
054166 


O05 - APR -84 


013746 
012737 
005037 
012702 
170102 
012705 
012704 
012724 
077503 
012702 
170422 
170203 
020227 
001401 
104003 


012702 
012701 
022227 
001401 
104003 


077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 
000240 


013746 
012737 
005037 
012702 
170102 
012705 
012704 
012724 
077503 


MACY11 30( 1046) 


16:45 


000004 
054120 
133436 
000200 
000004 
003122 
177777 


003122 


003132 


003122 
000004 
000000 


000204 


000004 
054306 
133436 
000200 


000011 
003122 
177777 


000004 


F16 


O5-APR-84 16:45 PAGE 201 
FLOATING POINT TESTS 
TSFP14: 

; TEST FDST SOP MODE 2 

MOV a04, -(SP) 
MOV OTSF 14,804 
CLR @OTRPFLG 
MOV #200 ,R2 
LOFPS Ro 
MOV 4 ,R5 
MOV @TSTLOC,R4 
100$: MOV 9177777,(R4)> 
SOB RS,100$ 
MOV #TSTLOC,R2 
CLROD (R2)6 
STFPS R3 
CMP R2,@TSTLOC+10 
BEQ 1$ 
ERROR +3 
1$: MOV @TSTLOC,R2 
MOV #4,R1 
2s; CMP (R2)+,%0 
BEG 3$ 
ERROR 3 
3$; SOB R1,2$ 
CMP R3,%204 
BEQ 4$ 
ERROR +3 
4$ MOV (SP )+,a04 
3 
JMP FIN14 

A 
TSF14: ERROR +3 
RTT 
3 
FIN14: NOP 


i a at 
;TEST FOST SOP MODE 
H 


: 

TSFP1S: 

‘ 
MOV aaa, -(SP) 
MOV OTSF15,904 
CLR @eTRPFLG 
MOV 0200 ,R2 
LOFPS R2 
MOV #9, ,R5 
MOV #TSTLOC,R4 

1003: MOV 0177777,(R4)> 
S08 R5,100$ 


sSAVE TIMEOUT VECTOR 
sSETUP NEW VECTOR 
sCLEAR TRAP FLAG 
sSETUP TO LOAD FPS 
sSET FD=1 
s INIT COUNTER 
sSETUP POINTER TO TEST LOCATION 
sMOVE ALL ONES TO TEST LOCATION 
sARE WE DONE 
sSETUP POINTER TO DATA 
; TEST INSTRUCTION 
;GET FPS 
31S R2 CORRECT 
s¥ES GO ON 
3FPP ERROR 


:NO GO TO ERROR 
s;SETUP POINTER TO DATA 
s INIT COUNTER 
s;CHECK LOCATION FOR O 
:YES GO ON 
3;FPP ERROR 
3NO GO TO ERROR 
sARE WE DONE 
sCHECK FPS 
3:0 GO ON 
3FPP ERROR 
:NO GO TO ERROR 
sRESTORE VECTOR 


3FPP ERROR 
30DD ADDRESS TRAP 
3RE TURN 


;SAVE TIMEOUT VECTOR 

;SETUP NEW VECTOR 

;CLEAR TRAP FLAG 

sSETUP TO LOAD FPS 

3SET FO#1 

s INIT COUNTER 

sSETUP POINTER TO TEST LOCATION 
sINIT TEST LOCATION 

sARE WE DONE 


SEQ 0200 


COKDABO KDJ11 6 CLUSTER MACY11 30( 1046) 
05 -APR-84 16:45 


COKDAB P11 


11048 
11049 
11050 
11051 
11052 
11053 
11054 
11055 
11056 
11057 
11058 


054170 
054176 
054202 


054314 


054314 
054320 
054326 
054332 
054336 
054340 
054344 
054350 
054354 


012737 
012702 
170432 
170203 
020227 
001401 
104003 


012702 
022227 
001401 
104003 


012701 
022227 
001401 
104003 


077105 
012701 
022227 
001401 
104003 


077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 
000240 


013746 
012737 
005037 
012702 
170102 
012705 
012704 
012724 
077503 


003134 
003122 


003124 


003122 
003134 


000004 
177777 


000204 


000004 
054452 
133436 
000200 


000010 
003122 
177777 


003122 


000004 


05 -APR 


1$; MOV 


63: SOB 


;TEST FOST SOP 
é 


3 

TSFP16: 

3 
MOV 
MOV 
CLR 
MOV 
LOFPS 
MOV 
MOV 

100$; MOV 
SOB 


G16 


5 PAGE 202 


-64 16 
FLOATING POTNT “TESTS 


@TSTLOC +12, a8@TSTLOC ; INIT TEST LOCATION 
#TSTLOC,R2 ;SETUP POINTER TO DATA 
a(R2)-> 3s TEST INSTRUCTION 

R3 3GET FPS 

R2, @TSTLOC+2 :1S R2 CORRECT 

1$ 3YES GO ON 

+3 3;—PP ERROR 


sNO GO TO ERROR 


@TSTLOC,R2 s;SETUP POINTER TO DATA 
(R2)+,#TSTLOC+12 3IS DATA CORRECT 
es 3YES GO ON 
3 3FPP ERROR 

3NO GO TO ERROR 
#4,R1 s INIT COUNTER 
(R2)+,9177777 3IS LOCATION ALL ONES 
4$ ;YES GO ON 
3 3;FPP ERROR 

:NO GO TO ERROR 
R1,3$ sARE WE DONE 
o4,R1 s INIT COUNTER 
(R2)+,%0 31S LOCATION 0 
6$ ;YES GO ON 
3 ;FPP ERROR 

;NO GO TO ERROR 
R1,5$ 3;ARE WE DONE 
R3, 0204 sCHECK FPS 
7$ ;0K GO ON 
3 3FPP ERROR 

:NO GO TO ERROR 
(SP )+, 304 sRESTORE VECTOR 
FINIS 
3 ;FPP ERROR 

;00D ADDRESS TRAP 

;RE TURN 


MODE 4 


ae4, -(SP) sSAVE TIMEOUT VECTOR 
OTSF 16,804 sSETUP NEW VECTOR 
aeTRPFLG sCLEAR TRAP FLAG 
#200 ,R2 sSETUP TO LOAD FPS 


Re sSET FD=1 

08.,R5 sINIT COUNTER 

@TSTLOC,R4 sSETUP POINTER TO TEST LOCATION 
#177777,(R4)> sINIT TEST LOCATION 

R5,100$ sARE WE DONE 


SEG 0201 


COKDABO KDJ11 B CLUSTER 
COKDAB.P 11 O5 - APR -84 


012702 
170442 
170203 
020227 
001401 
104003 


012701 
022227 
© 401 
14 054410 03 


07,105 
012701 
022227 
001401 
104003 


077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 
000240 


013746 
012737 
005037 
012702 
170102 
012705 
012704 
012724 
077503 
012737 
012702 
170452 
170203 
020227 
001401 


Hye! te 30( 1046) 


16:4 
003132 


003122 


000004 
LvTTv? 


000204 


000004 
054634 
133436 
000200 


000011 
003122 
177777 
003134 
003124 


003122 


000004 


003122 


05 -APR - 84 


Fle 


16:45 PAGE 203 


FLOATING POINT TESTS 


6$: MOV 


3 

TSF 16: 
RTT 

6 

FIN16:;: NOP 


; 
TSFP17: 
; 


100$; MOV 


@TSTLOC+10,R2 
-(R2) 

R3 

R2,@TSTLOC 

is 

+3 


04,R1 
(R2)+, #0 


R1,2$ 

eR1 
(R2)+,8177777 
3 


R1,4$ 
R3, #204 
6$ 


+3 
(SP )+,ae4 


FINL6 
+3 


MODE 5 


ae4,-(SP) 
eTSF17,ae4 
@eTRPFLG 

#200 ,R2 

R2 

#9. ,R5 
#TSTLOC,R4 
0177777,(R4)> 
RS5S,100$ 


#TSTLOC+12,a0TSTLOC 


@TSTLOC+2,R2 
a-(R2) 

R3 
R2,@TSTLOC 
1$ 


sSETUP POINTER TO DATA 
s TEST INSTRUCTION 


3GET FPS 
31S R2 CORREC’ 
ON 


31S LOCATION O 
;YES GO ON 

37 PP ERROR 

sNO GO TO ERROR 
3ARE WE DONE 
s INIT COUNTER 
31S LOCATION UNCHANGED 
;YES GO ON 

3;FPP ERROR 

3NO GO TO ERROR 
sARE WE DONE 
sCHECK FPS 
30K GO ON 

;FPP ERROR 

:NO GO TO ERROR 
sRESTORE vECTOR 


3FPP ERROR 
;006 ADDRESS TRAP 
;RETURN 


;SAVE TIMEOUT VECTOR 
;SETUP NEW VECTOR 
s;CLEAR TRAP FLAG 
sSETUP TO LOAD FPS 
3SET FDO=1 
s INIT COUNTER 
;SETUP POINTER TO TEST LOCATION 
;INIT TEST LOCATION 
sARE WE DONE 
sINIT TEST LOCATION 
sSETUP POINTER TO DATA 
3 TEST INSTRUCTION 
;GET FPS 
3IS Re CORRECT 
31—S GO ON 


SEG 0202 


COKDABO KNJ11-B CLUSTER 
COKDAB.P 11 


11160 
11161 
11162 
11163 
11164 
11165 
11166 
11167 
11168 
11169 

1170 

1171 
11172 
11173 
11174 
11175 
11176 
11177 


054546 


O05 - APR - 84 
104003 


022227 
001401 
104003 


012701 
022227 
001401 
104003 


077105 
012701 
022227 
001401 
104003 


077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 
000240 


005037 
013746 
012737 
012702 
170102 
012705 
012704 
012724 
077503 
012702 
170462 
170203 
020227 
001401 
104003 


MACY11 30(1046) 05-APR-84 


16:45 


003134 


000004 
177777 


000204 


133436 


000004 
055006 
000200 


000010 
003122 
Rvr7T77 


003123 
000007 


003123 


000004 


L16 


16:45 PAGE 204 
FLOATING POINT TESTS 


ERROR +3 
1$: CMP (R2)+, @TSTLOC+12 
BEQ 2s 
ERROR +3 
2s MOV 4,R1 
3$ CMP (R2)+,0177777 
BEQ 4$ 
ERROR +3 
4$: S08 R1,3$ 
MOV #4,R1 
5$ cmp (R2)+,%0 
BEQ 6$ 
ERROR +3 
6$: SOB R1,5$ 
CMP R3, 0204 
BEQ 7$ 
ERROR +3 , 
7$ MOV csp)! ,aea 
é 
JMP FIN17 
TSF17: ERROR +3 
RTT 
FIN17: NOP 


3 
TSFP2O: 
; 
CLR ae¢TRPFLG 
MOV @TSF20,004 
MOV #200 ,R2 
LOFPS Re 
MOV $8, ,R5 
MOV #TSTLOC,R4 
100$: MOV #177777,C(R4)> 
S0B RS5S,100$ 
MOV #TSTLOC+1,R2 
CLRD 7CR2) 
STFPS R3 
CMP R2,¢TSTLOC+1 
BEG 1$ 
ERROR +3 


3FPP ERROR 
sNO GO TO ERROR 
31S DATA CORRECT 


;YES GO ON 
3FPP ERROR 
sNO GO TO ERROR 
; INIT COUNTER 
31S LOCATION ALL ONES 
;YES GO ON 
3;FPP ERROR 
:NO GO TO ERROR 
;ARE WE DONE 
s INIT COUNTER 
:IS LOCATION O 
:YES GO ON 
3;FPP ERROR 
:NO GO TO ERROR 
sARE WE DONE < 
;CHECK FPS 
30K GO ON 
3;FPP ERROR 
:NO GO TO ERROR 
sRESTORE VECTOR 


;FPP ERROR 
3000 ADDRESS TRAP 
sRE TURN 


;CLEAR TRAP FLAG 
sSAVE TIMEOUT VECTOR 
;SETUP NEW VECTOR 
sSETUP TO LOAD FPS 
3;SET FD=1 
s INIT COUNTER 
s;SETUP POINTER TO TEST LOCATION 
sINLT TEST LOCATION 
sARE WE DONE 
;SETUP POINTER TO DATA 
3 TEST INSTRUCTION 
3;GET FPS 
31S Re CORRECT’ 
3YES GO ON 
3 PP ERROR 
:NO GO TO ERROR 


SEQ 020% 


Soak» KDJ11 B CLUSTER 
COKDAB.P 11 05 -APR 


11216 012702 
11217 012701 
11218 022227 
11219 001401 
11220 104003 


077105 
012701 
022227 
001401 
104003 


077105 
020327 
001401 
104003 


012637 


054726 


000167 
104003 
000006 
000240 


055010 
055012 


055014 


055014 
055020 


005037 
013746 
012737 
012702 
170102 
012705 
012704 
012724 
077503 
012737 
012702 
170472 
170203 
020227 
001401 
104003 


012702 
012701 
022227 


055122 001401 


MACY1L1 30( 1046) 
-84 16:45 


003122 
000004 
177777 


000004 
000000 


000204 


133436 


000004 
055176 
000200 


000010 
003122 
177777 
003122 
003125 
000005 


003125 


003122 
000004 
000000 


003132 


05 - APR -84 


FLOATING POINT TESTS 


1$: 
os: 


3$: 
4$: 


S$: 


6$: 


iTEST FOST 


isFp2i: 
3 


100$: 


1$: MOV 
2s: 


J] 6 


16:45 PAGE 205 


#TSTLOC ,R2 3SETUP POINTER TO DATA 
4,R1 s INIT COUNTER 
(R2)+, 177777 31S DATA CORRECT 
3$ ;Y€S GO ON 
+3 3;FPP ERROR 

:NO GO TO ERROR 
R1,2$ sARE WE DONE 
#4,R1 ; INIT COUNTER 
(R2)>, 31S DATA CORRECT 
5$ ;YES GO ON 
3 3;FPP ERROR 

sNO GO TO ERROR 
R1,4$ sARE WE DONE 
R3,%204 ;IS FPS CORRECT 
6$ ;YES GO ON 
+3 3;FPP ERROR 

s;NO GO TO ERROR 
(SP )+ sRESTORE VECTOR 
FIN2O 
+3 3;FPP ERROR 

;0D0D ADDRESS TRAP 

;RE TURN 

MODE 7 
ae¢TRPFLG ;CLEAR TRAP FLAG 
ae4,-(SP) sSAVE TIMEOUT VECTOR 
@TSF21,a04 ;SETUP NEW VECTOR 
#200,R2 ;SETUP TO LOAD FPS 
Re ;SET FD=1 
#8. ,R5 ; INIT COUNTER 
#TSTLOC,R4 :;SETUP POINTER TO TEST LOCATION 
#177777,CR4)-> ; INI TEST LOCATION 
R5,100$ sARE WE DONE 
#TSTLOC ,a#TSTLOC+10 ;INIT TEST LOCATION 
#TSTLOC+3,R2 s;SETUP POINTER TO DATA 
a5(R2) ; TEST INSTRUCTION 
R3 3GET FPS 
R2,eTSTLOC+3 :IS R2 CORRECT 
1$ :YES GO ON 
+3 ;FPP ERROR 

3;NO GO TO ERROR 
#TSTLOC,R2 ;SETUP POINTER TO DATA 
#4,R1 s INIT COUNTER 
(R2)+,%0 31S DATA CORRECT 
3$ ;YES GO ON 


SEQ 0204 


COKDABO KDJ11-B8 CLUSTER 
COKDAB.P11 O05 - APR -84 


11272 055124 104003 
11273 
11274 055126 077105 
11275 055130 022227 
11276 055134 001401 
11277 055136 104003 
055140 012701 
055144 022227 
055150 001401 
055152 104003 
055154 077105 
055156 020327 
055162 001401 
055164 104003 


055166 012637 


055172 
055176 
055200 
055202 


000167 
104003 
000006 
000240 


005037 
013746 
012737 
012702 
170102 
012705 
012704 
012724 
077503 
012737 
170437 
170203 
012702 
012701 
022227 
091401 
104003 


077105 
012701 
022227 


055302 
055304 
055310 


MACY11 30( 1046) 
16:45 


003122 
000003 
177777 


000204 


133436 


000004 
055342 
000200 


000010 
003122 
177777 


003132 
003122 


000004 


003122 


000004 
177777 


K16 


OS-APR-84 16:45 PAGE 206 
FLOATING POINT TESTS 
ERROR +3 
3$: soB R1,2$ 
CMP (R2)+, *TSTLOC 
BEQ 4$ 
ERROR +3 
4$: MOV #3,R1 
S$: CMP (R2)+,%177777 
BEQ 6$ 
ERROR +3 
6$: SOB R1,5$ 
CMP R3,%204 
BEQ 7$ 
ERROR +3 
7$: MOV (SP )+,a04 
; 
JMP FIN21 
TSF21: ERROR +3 
RTT 
FIN21: NOP 


3FPP ERROR 

s;NO GO TO ERROR 
sARE WE DONE 
31S DATA CORRECT 
;YES GO ON 

3FPP ERROR 

:NO GO TO ERROR 
; INIT COUNTER 
3;IS DATA CORRECT 
;YES GO ON 

3;—PP ERROR 

sNO GO TO ERROR 
sARE WE DONE 
;CHECK FPS 
30K GO ON 

;FPP ERROR 

;NO GO TO ERROR 
sRESTORE VECTOR 


;FPP ERROR 
;00D ADDRESS TRAP 
;RE TURN 


3 
TSFP22: 
3 
CLR a¢TRPFLG ;CLEAR TRAP FLAG 
MOV a4, -( SP) ;SAVE TIME OUT VECTOR 
MOV #TSF22,a04 ;SETUP NEW VECTOR 
Vv #200 ,R2 sSETUP TO LOAD FPS 
LOFPS Re 3SET FD=1 
MOV #8.,R5 ; INIT COUNTER 
MOV #TSTLOC,R4 ;SETUP POINTER TO TEST LOCATION 
100$: MOV #177777,(R4)> ;INIT TEST LOCATION 
SoB R5,100$ ;ARE WE DONE 
MOV #TSTLOC+10,a¢TSTLOC sINIT TEST LOCATION 
CLRD aeTSTLOC ; TEST INSTRUCTION 
STFPS R3 ;GET FPS 
“OV &TSTLOC,R2 ;SETUP POINTER TO DATA 
MOV #4,R1 ; INIT COUNTER 
1$: CMP (R2)+,%0 3IS DATA CORRECT 
BEQ 2s sYES GO ON 
ERROR +3 3FPP ERROR 
3;NO GO TO ERROR 
2s: SOB R1,1$% ;ARE WE DONE 
MOV #4,R1 s INIT COUNTER 
3$: CMP (R2)+, #177777 31S DATA CORRECT 


SEQ 0205 


COKDABO KDJ11-B8 CLUSTER 


COKDAB.P11 


055314 
055316 


055320 
055322 
055326 
055330 


055332 


055336 
055342 
055344 
055346 


055350 


055440 
055442 
055446 
055450 


055452 


055456 
055462 
055464 


O05 - APR - 84 


001401 
104003 


077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 
000240 


005037 
013746 
012737 
012702 
170102 
012705 
012704 
012724 
077503 
170467 
170203 
012701 
012702 
022227 
001401 
104003 
077105 
020327 
001401 
104003 


012637 


000167 
104003 
00C006 


MACY11 30( 1046) 


16:45 


000204 


177777 
125504 


000004 
003122 
000000 


000204 


000004 


lL 16 


O5S-APR-84 16:45 PAGE 207 
FLOATING POINT TESTS 
BEQ 4$ 
ERROR +3 
4$; SOB R1,3% 
CMP R3, #204 
BEQ 5$ 
ERROR +3 
5$: MOV CSP )+,ae4 
Hy 
JMP FIN22 
TSF22: ERROR +3 
RTT 
3 
FIN22: NOP 


Hy 
TSFP23: 
; 
CLR aeTRPFLG 
MOV aaa, -(SP) 
MOV oTSF23,a04 
MOV #200,R2 
LOFPS R2 
MOV #4,R5 
MOV #TSTLOC,R4 
100$: MOV 9177777, (R4)> 
SOB RS, 100$ 
CLRD  —*TSTLOC 
STFPS RB 
MOV 04,R1 
MOV @TSTLOC,R2 
18: CMP (R2)+, 60 
BEQ 23 
ERROR +3 
2s: S08 R1,1$ 
CMP R3_9204 
BEQ 33 
ERROR +3 
3$; MOV (SP)+,a04 
, JMP FIN23 
; 
1SF23; ERROR +3 
RIT 


:YES GO ON 
3FPP ERROR 
:NO GO TO ERROR 
sARE WE DONE 
;CHECK FPS 


sNO GO TO ERROR 
sRESTORE VECTOR 


3FPP ERROR 
:0DD ADDRESS TRAP 
;RETURN 


:;CLEAR TRAP FLAG 
;SAVE TIMEOUT VECTOR 
;SETUP NEW VECTOR 
;SETUP TO LOAD FPS 
3;SET FD=1 
s INIT COUNTER 
;SETUP POINTER TO TEST LOCATION 
; INIT TEST LOCATION 
;ARE WE DONE 
; TEST INSTRUCTION 
;GET FPS 
; INIT COUNTER 
;SETUP POINTER TO DATA 

31S DATA CORRECT 
;YES GO ON 

;FPP ERROR 

;NO GO TO ERROR 
;ARE WE DONE 
;CHECK FPS 
;0K GO ON 

3;FPP ERROR 

:NO GO TO ERROR 
sRESTCRE VECTOR 


;FPP ERROR 
;00D ADDRESS TRAP 
‘ 


SEQ 0206 


OKDABO KDJ11-B CLUSTER MACY11 30( 1046) 
05 - APR - 84 


OKDAB 


11384 
11385 
11386 
11387 
11388 
11389 
11390 
11391 
11392 
11393 
11394 
11395 
11396 
11397 
11398 
11399 
11400 
11401 
11402 
11403 
11404 
11405 
11406 
11407 
11408 
11409 
11410 
11411 
11412 
11413 
11414 
11415 
11416 
11417 
11418 
11419 
11420 
11421 
11422 
11423 
11424 
11425 
11426 
11427 
11428 
11429 
11430 
11431 
11432 
11433 
11434 
11435 
11436 
11437 
11438 
11439 


PIL 
055466 


055470 


055470 
055474 
055500 
055506 
055512 
055514 
055520 
055524 
055530 
055532 
055540 
055544 
055546 
055552 
055556 
055562 
OSS5€4 


055566 
055570 
055574 
055576 


055600 
055604 
055610 
055612 
055614 
055616 
055622 
055624 


055626 


055632 
055636 
055640 
055642 


000240 


005037 
013746 
012737 
012702 
170102 
012705 
012704 
012724 
077503 
012737 
170477 
170203 
012702 
012701 
022227 
001401 
104003 


077105 
22227 
001401 
104003 


012701 
022227 
001401 
104003 
077105 
020327 
001401 
104003 


012637 


000167 
104003 
000006 
000240 


16:45 


177777 


003122 
125366 


003122 
000004 
000000 


003122 
000003 
177777 


000204 


003132 


Mlb 
OS-APR-84 16:45 PAGE 208 
FLOATING POINT TESTS 


FIN23; NOP 
3 
é 


3 
TSFP24: 
2 
CLR QeTRPFLG ;CLEAR TRAP FLAG 
MOV ava, -( SP) s;SAVE TIMEOUT VECTCR 
MOV eTSF 24,004 ;SETUP NEW VECTOR 
MOV #200 ,R2 sSETUP TO LOAD FPS 
LOFPS R2 3SET FD=1 
MOV #8.,R5 ; INIT COUNTER 
MOV @TSTLOC,R4 ;SETUP TEST LOCATION POINTER 
100$: MOV #177777,(R4)> ;INIT TEST LOCATION 
S08 R5,100$ ;ARE WE DONE 
MOV #TSTLOC, a@TSTLOC+10 ;INIT TEST LOCATION 
CLRO @TSTLOC+10 3; TEST INSTRUCTION 
STFPS R3 ;GET FPS 
MOV @TSTLOC,R2 ;SETUP POINTER TO DATA 
MOV #4 ,R1 ; INIT COUNTER 
1$: CMP (R2)+, 90 3IS DATA CORRECT 
BEQ es ;YES GO ON 
ERROR +3 ;FPP ERROR 
3;NO GO TO ERROR 
2s: SOB R1,1$ ;ARE WE DONE 
CMP (R2)+,@TSTLOC 31S DATA CORRECT 
BEQ 3$ ;YES GO ON 
ERROR +3 ;FPP ERROR 
:NO GO TO ERROR 
3$: MOV 93,R1 ;INIT COUNTER 
4 CMP (R2)+,@177777 31S DATA CORRECT 
BEQ 5$ sYES GO ON 
ERROR +3 :FPP ERROR 
sNO GO TO ERROR 
S$: SOB R1,4$ ;ARE WE DONE 
CMP R3,#204 ;CHECK FPS 
BEQ 6$ ;0K GO ON 
ERROR +3 ;FPP ERROR 
;NO GO TO ERROR 
6$ MOV (SP)+,ae4 ;RESTORE VECTOR 
‘ 
JMP FIN24 
; 
TSF24: ERROR +3 :FPP ERROR 
;0DD ADDRESS TRAP 
RIT ; 
FIN24: NOP 


sTEST CLRF 


SEQ 9207 


B | 


COKDABO KDJ11-8 CLUSTER awd! 30( 1046) pLBAT Ine -84 16:45 PAGE 209 


COKDAB .P11 


055706 


056010 
056014 
056020 


OS - APR -84 


005037 


005004 
170104 
170567 
170203 
0203527 
001401 
104003 


012704 
012702 
004 767 


133436 


000004 
003122 
177777 
003122 


003126 


000002 
177777 


TING POINT TESTS 


SFP2S: 


- —je oe 


1008; 


18%: 
28: 


38: 
4$; 


58: 


iTEST 
; 


3 
TSFP26; 
H 


TSTF AND 


CLR 
CLR 
LOFPS 
TSTF 
STFRS 
CMP 
BEQ 
ERROR 


MOV 
“Ov 
JSR 


) 
@TSTLOC, Ra 
@177777,(R4)> 

100% 


RS, 
@TSTLOC ,R2 
(R2)> 


R3 
R2,@TSTLOC +4 
18 

3 

@TSTLOC ,R2 


3 


T51D 
BeOTRPF LI, 
oT 226D0 ,R4 


@T526D8 Re 
PC, CHECK 


sCLEAR TRAP FLAG 


s INIT COUNTER 


sSETUP POINTER TO TEST LOCATION 


sINIT TEST LOCATION 
DONE 


1 SETUP — TO DATA 


t ves INSTRUCT I 
sGET FPS 


3IS R2 CORRECT 


sYES GO ON 


3FPP ERROR 
sNO GO TO ERROR 
sSETUP POINTER TO DATA 


s INIT COUNTER 


sIS DATA CORRECT 


WE DONE 
s INIT COUNTER 


2IS DATA CORRECT 


sYES GO ON 


sFPP ERROR 
sNO GO TO ERROR 


sARE WE DONE 
sCHECK FPS 
30K GO ON 


3FPP ERROR 
sNO GO TO ERROR 


;CLEAR TRAP FLAG 
sSETUP TO LOAD FPS 


sSET FD=0 


s TEST INSTRUCTION 


sGET FPS 
sCHECK FPS 
30« GO ON 


3 PP ERROR 
3NO GO TO ERROR 


s5— TURP POINTERS 'O DATA 


: 
sCHt ce Te DATA Is 


CURRED’ 


SEQ 0208 


COKDABO KDI11L B CLUSTER ert 801 1046) 
APR -84 


COKDAB.P 11 


11496 056024 


05 - 


170537 
170203 


000167 
012701 


11545 056230 022422 


549 056236 


001401 
104003 


077104 


11 
* ieee 056240 000207 
oe Pe) 


16:4 
056052 
O00010 


056252 
056302 
000146 

200 


05 APR 


FLOATING *POIN 


43%: 


~ 


BP 19. A 210 


@0TS2601 
R 


@TS2602 ,R4 
@152605,,R2 


@TS52600 ,R4 
@152603,R2 


ING 


04,R1 

(RO 1+ RO)e 
es 

8 


Ril,1$ 
Pc 


i 


s TEST INSTRUCTION 
GET FPS 
3 CHECK FPS 
;0K GO ON 
3FPP ERROR 
sNO GO TO ERROR 
sSETUP POINTERS TO DATA 


3 
sCHECK IF DATA IS CORRECT 
s TEST INSTRUCTION 
sGET FPS 
;CHECK FPS 
3:0 GO ON 

sFPP ERROR 

sNO GO TO ERROR 
;SETUP POINTERS TO DATA 


8 
;CHECK IF DATA IS CORRECT 
sSETUP TO LOAD FPS 
3SET FD#1 
3 TEST INSTRUCTION 
3;GET FPS 
3;CHECK FPS 
:0* GO ON 
3FPP ERROR 
:NO GO TO ERROR 
sSETUP POINTERS TO DATA 


3 
;CHECK IF DATA IS CORRECT 
; TEST INSTRUCTION 
3;GET FPS 
;CHECK FPS 
30% GO ON 
3—PP ERROR 
sNO GO tO ERROR 
sSETUP POINTERS TO DATA 


3 
sCHECK IF DATA IS CORRECT 
s TEST INSTRUCTION 
3GET FPS 
3CHECK FPS 
30% GO ON 
3F PP ERROR 
3NO GO TO ERROR 


sINIT COUNTER 
3IS DATA Pi 
:7’€S GO ON 

3— PP ERROR 

:NO GO TO ERROR 
sARE we DONE 
;RE TURN 


SEQ 020% 


“4 
mame ans 


012702 
004 767 
020327 
001401 
104003 


012705 
17C62% 


1 800 1046) 


133436 


000014 
003122 
056550 


003122 


003122 
056600 


000126 
000000 


003132 


OS APR A4 


[) | 


16:45 PAGE 711 


FLOATING POINT TESTS 


TSOHDO; . WORD 
° D 
TSO601: 


TS26D?: 


TS26D4; 


WORD 
WORD 
WORD 
WORD 
WORD 
wOoRD 
WORD 
wORD 
WORD 
TS26D3: .WORD 
wORD 
wORD 
wORD 
wORD 
WORD 
WORD 
WORD 
TS26D05: .WORD 
WORD 


; 
sTEST ABS 
; 


3 
TSFP2?: 
3 


1008: MOV 


1$: MOV 


7777 


SOONOC COR Re eH KH OOONCC ORK eee 
™~ 
be ~ 
™ 
~~ 


@OTRPFLG 
RS 


RS 

#12.,R1 
@TSTLOC,R4 
@TS2700,R3 
(R3)+,(R4)- 
R1,100$ 


R5,e@TSTL OC 
18 
8 


©1502 708,R2 
PC. CHECe? 
R3,20 

2% 

+8 


@TSTLOC+10,R5 
(O25). 


sCLEAR TRAP FLAG 
sSETUP TO LOAD FPS 


sSET FD=0 
s INIT COUNTER 


;SETUP POINTER TO TEST LOCATION 
sSETUP POINTER TO TEST VALUE 
sINIT TEST LOCATION 


sARE WE DONE 


sSETUP POINTER TO DATA 
; TEST INSTRUCTION 


3IS RS CORRECT 


3;GET FPS 
3YES GO ON 


3—PP ERROR 

sNO GO TO ERROR 
sSETUP POINTER TO DATA 
sCHECK IF DATA IS CORRECT 


sCHECK FRS 
30% GO ON 


3* PP ERROR 

:NO GO TO ERROR 
sSETUP POINTER TO DATA 

3s TEST INSTRUCTION 


- 


SEQ 0210 


COKDABO KNJ11L B CLUSTER MACY11 8001046) 
COKDAB.P LI 05 -APR-84 16:45 


11608 056422 170203 
11609 056424 020527 
1lie10 056430 001401 
1loll 104003 


012705 003132 
056440 012702 056610 
004 767 
056450 020327 000000 
001401 
104003 


056460 012705 003122 


0031 86 


056502 012705 003142 
056506 012702 056620 
11629 056512 004767 
020327 
OSe522 001401 
104003 


000167 


056532 012701 
022522 
056540 001401 
104008 


077104 
000207 


177777 
177777 


05 APR 84 


>» 


16:45 PAGE 21e 


FLOATING POINT TESTS 


S$; 


4$;: 


S$: 


es: 

3 
TS$27D0: 
TS?7D1: 
1$e¢/Ve: 
T $2 7D2 : 


T5e "D4: 


R38 
RS, OTSTLOC+14 
3$ 
oe] 


#1S27D4,R2 
PC. CHECO? 
°0 


#TSTLOC,RS 
20(R5) 

R3 

R5,eTSTLOC 

5$ 

3 
@TSTLOC+20,R5 


FING? 


04,R1 
CRS)+,CR2)> 
es 


+3 
R1,1$ 
Pc 


177777 
177777 
17777? 
177777 
$7? 
175436 
136477 
1 


17? 
175456 
13647" 
1 


3GET FPS 
31S RS CORRECT 
ON 


sNO GO TO ERROR 
sSETUP POINTER TO DATA 


3 
;CHECK IF DATA IS CORRECT 
sCHECK FPS 
;0* GO ON 

3*PP ERROR 


sNO GO TO ERROR 
sSETUP POINTER TO DATA 
; TEST INSTRUCTION 
sGET FPS 
~ 31S RS CORRECT 


:NO GO TO ERROR 
sSETUP POINTERS TO DATA 


F 
3;CHECK IF DATA [5S CORRECT 
sCHECK FPS 
30% GO ON 

3— PP ERROR 

sNO GO TC ERROR 


s INIT COUNTER 
3IS DATA CORRECT 
3TES GO ON 

3FPP ERROR 

sNO GO TO ERROR 

sARE WE DONE 
3RE TURN 


SEQ O21i 


COKDABO KOILL B CLUSTER MACY11 S01 1046) 


OKDAB P11 


llood 
L165 


05 7006 
057C1i0 


005037 
012705 
170105 
012701 
012704 
012703 
012324 
077102 
012705 
170615 
170203 
020527 
001401 
104003 


012702 
004767 
020327 
001401 
104003 


012705 
170625 
170203 
020527 
001401 
104003 


012705 
012702 
004 767 
020327 
001401 
104003 


012705 
170665 
170203 
02052? 
00140} 
104003 


O5-APR 84 10:45 


133436 
000200 


000014 
003122 
057060 


003122 


003122 


057110 
000126 
000200 


003132 


003142 


O5-APR-84 16:45 PAGE 213 

FLOATING POINT TESTS 
. WORD 136477 
. WORD 1 

TS27D05: .WORD fe) 
-WORD O 
. WORD 136477 
. WORD 1 

FIN2?: NOP 

; 

3 

b 6d skates pede igsebeRene ea 

sTEST ABSD 

3 

; 

TSFP30: 

3 
CLR @eTRPFLG 
MOV @200,R5 
LOFPS RS 
MOV #12.,R1 
MOV @TSTLOC,R4 
MOV @TS30D0,R3 

1008; MOV CR3)+,CR4)- 
S08 R1,100$ 
MOV @TSTLOC,RS 
ABSD CRS) 
STFPS RS 
CMP RS, @TSTLOC 
BEQ 1s 
ERROR +3 

1$: MOV #TS3003,R2 
JSR PC, CHEC3O 
CMP R3,9200 
BEQ es 
ERROR 3 

2s: MOV @TSTLOC+-10,R5 
ABSD CRS). 
STFPS R3 
CMP RS. @TSTLOC+20 
BEQ 3$ 
ERROR 3 

3$: MOV @TSTLOC-10,R5 
MOV #TS3004 ,R2 
JSR PC,CHECSO 
CMP R3,#200 
BEQ 4$ 
ERROR 3 

4$: MOV @TSTLOC,RS 
ABSD 20(R5) 
STFPS RB 
CMP R5,@TSTLOC 
BEG 5$ 
ERROR 3 


;CLEAR TRAP FLAG 
;SETUP TO LOAD FPS 
3SET FD=1 
s INIT COUNTER 4 
;SETUP POINTER TO TEST LOCATION 
:SETUP POINTER TO TEST VALUE 
sINIT TEST LOCATION 
sARE WE DONE 
;SETUP POINTER TO DATA 
s TEST INSTRUCTION 
3GET FPS 
31S RS CORRECT 
:YES GO ON 
3FPP ERROR 
:NO GO TO ERROR 
;SETUP POINTER TC DATA 
sCHECK IF DATA IS CORRECT 
sCHECK FPS 
30K GO ON 
3FPP ERROR 
sNO GO TO ERROR 
3;SETUP POINTER TO DATA 
; TEST INSTRUCTION 
3;GET FPS 
:IS RS CORRECT 
:YES GO ON 
;FPP ERROR 
;NO GO TO ERROR 
;SETUP POINTERS TO DATA 


Hy 
;CHECK IF DATA IS CORRECT 
;CHECK FPS 
;0K GO ON 
3;FPP ERROR 
sNO GO TO ERROR 
sSETUP POINTER TO DATA 
; TEST INSTRUCTION 
3;GET FPS 
3IS RS CORRECT 
3¥ES GO ON 
3* PP ERROR 


SEQ O212 


COKDABO KDI11 B CLUSTER wey 50. 1046) 
OS - APR 


COKDAB 


PLi 


057140 


057142 


057142 
057146 
057152 


000167 


012701 
02eSe2 
001401 
104003 


077104 
000207 


177777 


005037 
013746 
012737 


84 10:4 


003142 
057130 
Q000148 
000204 


0000 76 


133436 
000004 
057254 000004 


(| 
0S APR 16:45 PAGE 214 
FLOATING POINT TESTS 


5$: MOV #TSTLOC+20,R5 
MOV @T53005,Re 
JSR PC,CHEC30 
CMP R3,8204 
BEQ 6$ 
ERROR +3 
6$: 
Fy 
JMP FIN3O 
CHEC30: MOV #4,R1 
1$ CMP CR5)+,CR2)- 
BEQ es 
ERROR 3 
RTS PC 
3 
TS30D0: .WORD 177777 
. WORD 177777 
. WORD 177777 
. WORD 177777 
TS3001: .WORD 377 
. WORD 175436 
. WORD 136477 
WORD 1 
TS30D2: .WORD 177 
~ WORD 175436 
. WORD 136477 
~ WORD 1 
TS30D3: .WORD 77777 
wORD 177777 
. WORD 177777 
. WORD LTT TF 
TS3004: .WwORD 377 
. WORD 175436 
.~WORD 136477 
. WORD 1 
TS3005: .WORD 18) 
. WORD 0 
. WORD 7) 
- WORD 19) 
FIN30O: NOP 
F 
Baas . ie 2 
sTEST FDST SOP MODE © GR? 
3 
3 
TSFP 41 
3 
CLR @eTRPFLG 
MOV aoa, -( SP) 


MOV OTsh 51,a04 


sNO GO TO ERROR 
:SETUP POINTERS TO DATA 


° 
:CHECK IF DATA IS CORRECT 
;CHECK FPS 
30K GO ON 
3FPP ERROR 
sNO GO TO ERROR 


s INIT COUNTER 
:IS DATA CORRECT 
:YeES GO ON 

3FPP ERROR 

sNO GO TO ERROR 
sARE WE DONE 
3RE TURN 


;CLEAR TRAP FLAG 
sSA8ve TIMEOUT VECTOR 
s>6E TURP NEW VECTOR 


SEQ 0213 


Kohan p KDJLL Rs eH} 


COKDAB 


Pll 


057210 
OS7212 
057216 
057222 
057224 
057226 
057232 
057236 
057240 
057242 
057244 
057250 
057254 
057256 


057260 


ped! 80( 1046) 


R-84 16:4 


Me 702 
170102 
170527 
000240 
000240 
000240 
170203 
020327 
001401 
104003 


012702 
022227 
001401 
104003 


012701 
022227 
001401 
104003 


077105 
012637 


> 


000167 
104008 
000006 
000240 


005037 


000200 
000005 


000204 


057170 
000005 


0000 
0v0240 


133436 


000014 
003122 
057452 


123604 
003122 


057502 
000100 
000000 


H | 


OS -APR.84 16:45 PAGE 215 


FLOATING POINT TESTS 
MOV #200 ,Re 
LOFPS R2 
TSD31: TSTD os 
NOP 
NOP 
NOP 
STFPS R3 
CMP R3,8204 
BEQ 1$ 
ERROR 3 
1$: MOV #15051+2,R2 
CMP CR2)+, eS 
BEQ es 
ERROR 3 
2s MOV #3,R1 
R$: CMP CR2)+, 4240 
BEQ 4s 
ERROR 3 
as; SOB R1,3$ 
MOV (SP)+,ae4a 
2 
JMP FIN31 
3 
TSF 31: ERROR +3 
QTT 
: 
FINS! NOP 
H 
3 
hh eee eeoeeenee+*e + ce eeee 
sTEST NEGF 
: 
Hy 
TSFP32: 
3 
CLR @eTRPFLG 
CLR RS 
LDOFPS RS 
MOV #12.,R1 
MOV #TSTLOC,R4 
MOV #755200,R3 
100$;: MOV (R3)+,(RO)- 
$08 R1,100$ 
NEGF TSTLOC 
STFRS R3 
MOV @TSTLOC,RS 
MOV @15320%,R2 
JSR PC CHEC * 
CMP R3,00 
BEG 1$ 
t REOR 3% 


sSETUP TO LOAD FPS 
sSET FD=1 
; TEST INSTRUCTION 


3GET FPS 
sCHECK FPS 


;0K GO ON 

3—PP ERROR 

:NO GO TO ERROR 
sSETUP POINTER TO DAIA 
3IS DATA CORRECT 
:YES GO ON 

3FPP ERROR 

sNO GO TO ERROR 
s INIT COUNTER 
3:IS DATA CORRECT 
:YES GO ON 

3FPP ERROR 

:NO GO TO ERROR 
sARE WE DONE 
sRESTORE vECTOR 


3FPP ERROR 
:000 ADDRESS TRAP 
sRE TURN 


;CLEAR TRAP FLAG 
sSETUP TO LOAD FPS 
;SET FD=0 

sINIT COUNTER 


sSETUP POINTER TO TEST LOCATION 
sSETUP POINTER TO TEST VALLE 


sINIT TEST LOCATION 
sARE WE DONE 

s TEST INSTRUCTION 
3GET FPS 


sSETUP POINTERS TO DATA 
Gl 
sCHECK IF DATA IS CORRECT 


sCHECK FPS 
3¥&S GO ON 
3 PP ERROR 


SEQ 0214 


COKDABO KNI11 B CLUSTER MACT11 4801 1046) 
COKDAB.P 11 


11832 
11633 
11834 
11835 
11836 
11837 
11838 
11839 


OS -APR-84 16:45 


170767 123562 
057350 170203 
057352 012705 003132 
057356 012702 057512 
057362 004767 000046 
057366 020327 000010 
057372 001401 
104008 


057376 170767 123540 
057402 170203 
057404 012705 003142 
OS7410 012702 057522 
057414 004767 000014 
057420 020327 000004 
057424 001401 
057426 104003 


057430 
057430 000167 000076 


057434 012701 000004 
057440 022522 
057442 00140: 
057444 104003 


057446 077104 
057450 000207 


057452 170000 
057454 003541 
0S7456 177777 
057460 172710 
057462 070000 
057464 003541 
057466 177777 
057470 172710 
057472 000177 
057474 100000 
057476 177777 
057500 177007 
057502 070000 
057504 003541 
057506 177777 
057510 172710 
057512 170000 
057514 003541 
C57516 177777 
057520 172710 
057522 000000 
057524 000000 
057526 177777 
057530 177007 
957532 00C240 


05 APR 84 


I | 


16:45 PAGE 216 


FLOATING POINT TESTS 


1$: 


es: 


es: 


3 
TS32D0: 


T$3201: 


193208: 
TS3204;: 
TS532D5: 


FIN3.: 


TSTLOC +10 

R35 
@TSTLOC+10,R5 
@1532D4 ,RO 
PC, CHEC 32 
R3,910 

es 

+3 

TSTLOC +20 

R3 


#TSTLOC+20,R5 


sNO GO TO ERROR 


; TEST 
3GET FPS 
3 SETUP 
F 
sCHECK If DATA 
;CHECK FPS 
30K GO ON 
3—PP ERROR 
:NO GO TO ERROR 
; TEST 
3;GET FPS 
3 SETUP 
3 
sCHECK IF DATA 
;CHECK FPS 
30" GO ON 
3—PP ERROR 


sNO GO TO ERROR 


sINIT COUNTER 


INSTRUCTION 
POINTERS [fO DAIA 
IS CORRECT 


INSTRUCTION 
POINTERS TO DATA 
IS CORRECT 


3IS DATA CORRECT 


sYES GO ON 
3FPP ERROR 
sNO GO TO ERROR 
;ARE WE DONE 
RE TURN 


SEG 0215 


COKDABO KN11 B CLUSTER 
05 APR -84 


COKDAB.P11 


11888 
11889 
11890 
11891 


11911 057616 


11913 057620 
11914 057624 
11915 057626 
11910 057632 
11917 057636 
11918 057642 
11919 057646 
11920 057650 


11922 057652 
11923 057656 
11924 057660 
11925 057664 
11926 057670 
11927 057674 
11926 057700 
11929 057702 


11931 057704 
11933 057704 
11935 057710 
11936 057714 
11937 057716 
11938 057720 


11940 057722 
057724 


11943 057726 


005037 
012705 
170105 
012701 
012704 
012703 
012324 
077102 
170767 
170203 
012705 
012702 
004767 
020327 
001401 
104003 


170767 
170203 
012705 
012702 
004767 
020327 
001401 
104003 


170767 
170203 
012705 
012702 
004767 
020327 
001401 
104003 


000167 


012701 
022522 
001401 
104003 


077104 
000207 


17C900 


MACY11 80( 1046) 
10:45 


133436 
000200 


000014 


003122 
057726 


123330 


05 - APR - 84 


J ] 


16:45 PAGE 217 


FLOATING POINT TESTS 


oe —Ger ee os of ee oe 


1008: MOV 


1$; NEGD 


2s: NEGD 


2%: 508 


752300: . WORD 


#12. ,R1 
@TSTLOC,R4 
#TS$33D00,R3 
(R3)+,CRO)> 
R1,100$ 
TSTLOC 

R3 


#TSTLOC,RS 
#T$3303,R2 


TSTLOC+10 
R3 


@TSTLOC+10,R5 


#153304 ,R2 
PC, CHEC33 
R3,@210 

es 

3 


TSTLOC +20 
R3 


@TSTLOC+20,R5 


#TS$3305,R2 
PC. CHEC33 


FINSS 

#4,R1 
(R5)+,(R2)- 
es 

+3 


R1,18 
PC 


1 70000 


sCLEAR TRAP FLAG 
sSETUP TO LOAD FPS 
sSET FO=1 

s INIT COUNTER 


sSETUP POINTER TO TEST LOCATION 


;SETUP POINTER TO TEST VALUE 
sINIT TEST LOCATION 
sARE WE DONE 
; TEST INSTRUCTION 
3GET FPS 
sSETUP POINTERS TO DATA 


3 
;CHECK IF DATA IS CORRECT 
;CHECK FPS 
30K GO ON 
3;FPP ERROR 
;NO GO TO ERROR 
; TEST INSTRUCTION 


sSETUP POINTERS TO DATA 


a 
sCHECK IF DATA IS CORRECT 
;CHECK FPS 
30K GO ON 
3;F PP ERROR 
sNO GO ‘TO ERROR 
; TEST INSTRUCTION 


sSETUP POINTERS TO DATA 


3 
;CMECK IF DATA IS CORRECT 
sCHECK FPS 
30K GO ON 
3;F PP ERROR 
:NC GO TO ERROR 


sINIT COUNTER 
3IS DATA CORRECT 
sYES GO ON 

3FPP ERROR 

3NO GO TO ERROR 
sARE WE DONE 
sRE TURN 


SEQ 0216 


COKDABO KDJ11-B CLUSTER MACY11 80( 1046) 


COKDAB .P11 


057730 
057732 
057734 
057736 
057740 
057742 
057744 
057746 
057750 
057752 
057754 
057756 
057760 
057762 
057764 
057766 
057770 


012704 
170104 
012702 
172407 


170201 
022701 
001401 
104003 


170312 
022722 
001401 
104003 


022722 
001401 
104003 


OS-APR-84 16:45 


047600 
003062 


147600 


000002 


060022 


05 - APR - 


84 16:45 PAGE 218 


FLOATING POINT TESTS 


153301: 
T533De: 
TS33D3: 
TS33D4: 
1$3305: 


FIN3SS: 
3 


3 
a 
3 -~“—7--fee e « 
3 


1$: 


3%; 


4%: 


NOP 


3541 

177777 

172710 
0000 


#47600 ,R4 
Ra 
@RECFEC,RO 
R7,ACO 


Rl 
#147600,R1 


@1$,(Ro)- 
4$ 
3 


;SETUP FPP STATUS 

sLOAD FP STATUS 

sPOINT TO RECEIVED FEC MEMOR® 
s*TEST INSTRUCTION 

sLOAD ACO FROM ILLEGAL AC7 
;SAVE FPP STATUS 

;VERIFY FER BIT SET 


eet IF GOOD ERROR CONDITION 
FER BIT DIONT SET 


sSAVE FEC AND FEA 
sVERIFY FEC CONTENTS 
sBRANCH IF GOOD 


ERROR 
NE 2 (OPCODE ERROR) 


;VERF Ty FEA CONTENTS 
sBRANCH FI GOOD 


ERROR 
NOT CORRECT ERROR ADDRESS 


SEQ 0217 
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060146 


060146 
060154 
060160 
060166 
060172 
060176 


O05 - APR 84 


012701 
012704 
012702 
i70102 
172424 
170203 
174021 
020203 
001401 
104003 


022704 
001401 
104003 


012704 
162701 
004767 
005767 
001401 
104003 


012737 
012701 
012737 
012704 
012702 
170102 


16:4 


003102 
003174 
047750 


053324 
122716 


003102 
003124 
003204 
003122 
047750 


003124 
003122 


OS APR 84 
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FLOATING POINT TESTS 


1$: 


2s: 


3%; 


#RECDST,R1 sPOINT TO RECEIVED DATA LOCATION 
#TABL,R4 sPOINT TO GOOD DATA 
#47750,R2 sLOAD GOOD STATUS 
Re 3;LOAD FPP STATUS - DOUBLE,ID 
(R4)+, ACO ;@TEST INSTRUCTION - MODE 2 
R3 sSAVE TEST FPP STATUS 
ACO,(R1)- ;SAVE TEST RESULT MODE 2 
R2,R3 ;VERIFY FPP STATUS 
1$ sBRANCH IF GOOD 
3 ;FPP ERROR 
;BAD FPP STSTUS 
#TAB1L+10,R4 ;VERFIy AUTO-INCR 
2s ;BRANCH IF GOOD 
-3 3FPP ERROR 
3BAD AUTO-INCR 
#TABL,R4 sPOINT TO RECEIVED DATA 
#10,R1 sRETURN R1 TO PROPER VALUE 
R7,DATVER sVERFIy DATA FROM FPP 
COUNT 3;SEE IF COUNTER=0 
3$ sBRANCH IF GOOD COMPARE 
+3 3FPP ERROR 
3;BAD DATA FROM FPP 
MRECDST ,@@TSTLOCeo sPOINT TO RECEIVED DATA LOCATION 
#TSTLOC+2,R1 sSETUP STO IN MOCE 3 
#TAB2,a#TSTLOC sPQINT TO DATA TABLE 
#TSTLOC,R4 sPOINT TO GOOD DATA 
#47750,R2 sLOAD GOOD STATUS 
RO 3LOAD FPP STATUS - DOUBLE,ID 


SEQ 0218 


M] 
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COKDAB.P11 05 -APR -84 16:45 FLOATING POIN! TESTS SEQ 0219 
12056 060200 172434 LOD a@(R4)+, ACO 3*TEST INSTRUCTION - MODE 2 
12057 060202 170203 STFPS R3 sSAVE TEST FPP STATUS 
12058 060204 174031 STO ACO,a(R1)+ sSAVE TEST RESULT IN MODE 3 
12059 060206 022703 047740 CMP 947740,R3 ;VERIF Y FPP STATUS 
12060 060212 001401 BEG 1$ ;BRANCH IF GOOD 
12061 060214 104003 ERROR 3 ;FPP ERROR 
12062 ;BAD FPP STSTUS 
12063 060216 022704 003124 1$: CMP STSTLOC-2,R4 ;VERFIy AUTO-INCR 
12064 060222 001401 BEG 2s ;BAD AUTO-DEC ON LOD 
12065 060224 104003 ERROR 3 3;— PP ERROR 
12066 } ;BAD AUTO-INC 
12067 060226 022701 003126 2s; CMP eTSTLOC-4,R1 ; TEST STO AUTO-INC 
12068 060232 001401 BEG 5$ sBRANCH IF GOOD 
12069 060234 104003 ERROR 3 ;FPP ERROR 
1207 3;BAD AUTO-INCR 
12071 060236 012704 003204 3s; MOV @TAB2,R4 sPOINT TO RECEIVED DATA 
12072 060242 012701 003102 MOV ORECDST,R1 sPOINT TO RECEIVED DATA 
12073 060246 004767 053210 JSR R7,DATVER ;VERFIY DATA FROM FPP 
12074 060252 005767 122602 Ts? COUNT 3SEE IF COUNTER-0 
12075 060256 001401 BEQ 4s ;BRANCH IF GOOD COMPARE 
12076 060260 104003 ERROR 3 3;f PP ERROR 
12077 ;BAD DATA FROM FPP 
12078 262 4s: 

12079 

12080 ; 

12081 3 

12082 3 

12083 3 

12084 g-s ae = 6% 

12085 sTEST LOF. STD MODE 4 

12086 3 

12087 : 

12088 : 

12089 : 

12090 060262 MLDOMG4 : 

12091 

12092 ; 

12093 060262 012701 0023106 OV @RECOST-4,81 sPOINT TO RECEIVED DATA LOCATION 
12094 060266 012704 003220 Ov e'ABS 4,84 sPOINT 10 GOOD DATA 

12075 060272 012705 003254 0 eT ABs RS ;CLEAR OUT ACO 

12096 060276 170127 000200 LOFPS 2200 3SE? TO DOUBLE 

12097 060302 172415 Loo (R85), ace 3ACO-0 

12098 060304 012702 047550 Ov 047550 ,R2 3;L0A8D GOOD STATUS FLOATING 
12099 060310 170102 LDOFPS) RO ;L0A€D FPP STATUS - DOUBLE.IO 
121090 060312 172444 io (R4), ATO ,;eTes? INSTRUCT ION MODE 4 
12101 060314 170203 sTres oR ;SAVE TEST FRPP STATUS 

12102 060316 012702 047750 "Ov 247750,82 ;SET TO DOVOLE MODE 

-. 12103 060322 170102 ores) ORD 3SET ©28P TO DOUBLE 

' 12104 060324 174041 $'D aco, (@1) ;SAVE TEST RESULT 
12105 060326 022703 047540 cow 047540 ,85 ;VERIFY FRPP STATUS 
12106 060332 001401 BEG 1s sBRANCR IF GOOD 
12107 060334 104003 § RROR -8 3°? SRROR 
12108 3,840 Per s7sfus 
12109 060336 022704 004214 1%: cs e' ans a6 ;vVERF Ty auto DEC 
12110 060342 00140: 5tG es ;8@4NCH IF GOOD 


12111 0604344 10400% t we aa -4 ;¢ OP FE RROR 


COKDABO KDJ11 B CLUSTER MAC11] 80° 1086) O05 PO B64 16:65 PAGE 271 
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12112 734 @vtO Ince 
12113 060346 012704 0o03214 at: Ov eTee a6 sPOINT 'O SECEI VED OtTa 
12114 060352 004767 053104 JS a? os vee sVE@ Ie DATA FOOH fee 
12115 060356 O0576? 1224676 ts? Coun’ sae * COmTER-O 
12116 060362 001401 ets es ;ece If COO Cowra 
12117 060364 104008 tom -! err € 
12118 584] 0474 POOF ihe 
12119 060366 "s 
12120 
12121 Py 
12122 : 
12123 Py 
121243 s 
12125 s 
12126 sTES? .OD me S 
12127 Fy 
12128 s 
12129 ‘ 
12°*0 ‘ 
12151 060366 "00h: 
12132 
12133 i 
12134 060366 012701 003102 Ds RE COST 81 gPOINT "CO SECEIT WED DOTS _ OC eT ION 
12135 060372 012704 0031246 ww *'srTvat.2 = sPOrNT "OC Goo Ders 
12136 060376 012737 003174 0038122 Ov ores. S275 <” ww OE 5 POTNTE® TO Date 
12137 060404 012702 047750 Oy o6°"S© 82 AO GOO 74 U5 
12138 060410 170102 inrs) 6a AOSD Fer ETAT oust . 1D 
12139 060412 172454 Loo @ (@4).4ac0 eoTes? IN ec lin «6 
12140 060414 170203 sTtry) es eet TEL RP ET EDS 
12141 060416 174011 s?o aco. #1) sewt "ES" Soar 
12142 060420 020203 ad a) 2? 7) ee ee 
12143 060422 001401 2°) is eee FF LOO 
12144 060424 104003 bes -§ ~ (= 
12145 . oe eee bee 
12146 060426 022704 003122 18: o- sa = geal a7 EC 
12147 060432 001401 6tG as ee 
12148 060434 104003 (eS -3 7 = 
12149 oe". eC 
12150 060436 012704 003174 2%, ba Or) c=) = s*Otw? "OS CPECTED DOTS 
12151 060442 004767 053014 J e° of ute weer ly Date Far ee 
12152 060446 005767 122406 Ls 3 cous! “at COAT 
12153 060452 001401 6c *s eal TF LO Ore 
12154 060454 1040038 ‘= & s J” i=. 
12155 -@20D Oats SOO eee 
12156 060456 Ss 
12157 
12158 ; 
12159 5 
12160 5 
12161 3f@s? DD =e «é 
12162 ° ; 
12163 ; . 
12164 5 
12165 5 
12166 060456 7 00", ; 


12167 


COKDABO KDIJ11 6 CLUSTER MACY11 30( 1046) 


COKDAB.P 11 


O05 - APR -84 


012701 
012704 
012702 
170102 
172464 
170203 
174061 
022703 
001401 
104003 


162701 
062704 
004767 
005 767 
001401 
1040083 


012701 


16:45 


177600 


052730 
122322 


003102 


003174 
047750 


003122 


003174 
052642 
122234 


003122 
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+ oe 
de 
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FLOATING POINT TESTS 


3$; 


@RECDST+200,R1 
@TAB2 -200,R4 
047750,R2 


R2 
200(R4), ACO 
R3 


ACO, -200(R1) 
047740,R5 


+3 


R7,DATVER 
COUNT 

3$ 

oh) 


@RECOST,R1 
Ra 


OTAB1L, @TSTLOC 
047750,R2 


R2 
BTSTLOC(R4), ACO 
R3 


OTAB1,R4& 
R?7,DATVER 
COUNT 

3$ 

5 


3F PP 
3BAD 


3F PP 
:BAD 


3F PP 
38AD 


3F PP 
;BAD 


3h PP 
;BAD 


sPOINT TO RECEIVED DATA LOCATION 
sSETUP R&@ FOR MODE 6 
sLOAD GOOD STATUS 
sLOAD FPP STATUS - DOUBLE,ID 
3L0D0 MODE 6 
sSAVE TEST FPP STATUS 
sSAVE TEST RESULT 
sVERIF y FRPP STATUS 
sBRANCH IF GOOD 
ERROR 
FPP STATUS 
3R1*RECDST 
sPOINT TO EXPECTED DATA 
sVERFIy DATA FROM FPP 
3SEE IF COUNTER=0 
sBRANCH If GOOD COMPARE 
ERROR 
DATA FROM FPP 


yer TO RECEIVED DATA LOCATION 
3R4=0 
sPOINTER FOR MODE 7 GOOD DATA 
sLOAD GOOD STATUS 
3;LOAD FPP STATUS - DOUBLE,ID 
seTEST INSTRUCTION MODE * 
sSAVE TEST FPP STATUS 
sSAVE TEST RESULT 
sVERIFY FRPP STATUS 
sBRANCH IF GOOD 
ERROR 
FPP STATUS 
s;VERFIvY CONTENTS OF R4 
sBRANCH IF GOOD 
ERROR 
Ra 
sPOINT TO RECEIVED CATA 
:VERF LY DATA FROM FRPP 
sSEE IF COUNTER*0 
sBRANCH IF GOOD COMPARE 
ERROR 
DATA FROM PP 


SEQ 022i 


CORDABO ADULTE B CLUSTER MACY 


COKDAB.F 11 


012701 


170203 
174011 
022703 
001401 
104003 


004767 
005767 
001401 
104003 


022703 


003102 
003234 
047750 
043243 


000003 


047740 


052550 
122142 


003254 


ll 80( 1046) 
O05 -APR-84 16:45 
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FLOATING POINT TESTS 


MLDM2?7; 

+ 

18: STFPS 
es: JSR 
3$: 


F 
MNNRM 1: 


;TEST ADDF, ADDD, SUBF, SUBD. 
3 


@RECDST,R1 
eTABS,R4 
047750,R2 
RS 


R2 
«eae 


R35 
ACO,(R1) 
047740,R3 
es 

3 


R7,DATVER 
COUNT 


3$ 
3 


@TABE RO 
RECDST+4 
RECDST +6 
#40000 ,R2 
R2 
(R4),ACO 
(R4),ACO 
R3 

240004 ,RS 


C? 


10:45 PAGE 223 


3;FPP 
3BAD 


3F PP 
3BAD 


3F PP 
' 3BAD 


ACO-0 


TEST LOD MODE 27 - ON.Y 16 BITS ARE LOADED OR STORED 


sPOINT TO RECEIVED DATA LOCATION 
sPOIN! TO GOOD DATA 

sLOAD GOOD STATUS 

3RS*0 

3;LOAD FPP STATUS DOUBLE , IO 

seTEST INSTRUCTION - MODE 27 


3s TEST PROPER PC PATH 
;VERIFY ONLY 3 PC INCREMENT 
sBRANCH IF PROPER PC ACTION 
ERROR 
MODE 27 LOAD 
sSAVE TEST FPP STATUS 
sSAVE TEST RESULT 
;VERIFyY FRPP STATUS 
sBRANCH IF GOOD 
ERROR 
FPP STATUS 
s;VERFIy DATA FROM FPP 
sSEE IF COUNTER=0 
sBRANCH IF GOOD COMPARE 
ERROR 
DATA FROM FPP 


FSRC=0; 


sPOINT TO FSRC TEST DATA 
sCLEAR OUT RECEIVED DATA TABLE 


3 

3SET UP GOOD STATUS 

3LOAD FPP STATUS, FLOATING 
sLOAD ACO WITm O 

30-0 

sS4VE STATUS 

sVERIFY STATUS 


SEQ 0222 


COKDABO KNILL B CLUSTER MACYLI 8001046) 


COKDAB.P 11 


22 060 756 
060760 


060762 
060 766 
12285 060 
12286 060 
061000 
061002 


061004 


12281 
2282 


12283 
12284 


12287 
12288 
12289 

2290 
lee9l 
12292 
12293 
12294 
12295 
12296 
12297 


O05 -APR-84 16:45 


001401 
104003 


012701 


012702 
170102 
172414 
172014 
174011 
170203 
022703 
001401 
104003 


004767 
005737 
001401 
104003 


172414 
173014 
170203 
022703 
001401 
104003 


174011 
004767 
005767 
001401 
104003 


170127 
172414 
173014 
17C203 
174011 
022703 
001401 
104003 


004767 
005767 
001401 
104003 


040204 
052424 


003060 


040204 


052370 
121762 


000004 


052330 
121722 


05 
FLOA 


1$; 


2s: 


3$; 


44$; 


4$: 


5$: 


6%: 


7$3 


D2 


APR-84 16:45 PAGE 224 
TING POINT Tests“ 
BEQ 1s 
ERROR +3 
MOV @RECDST RI 
STF ACO. (RL) 
JSR R7.OATVER 
TST COUNT 
BEQ 23 
ERROR +3 
MOV 040200,R2 
LOFPS RD 
LOD (R4), ACO 
ADDD  (R4)_ACO 
STD ACO, (R1) 
STFPS RS 
CMP 040204 ,R3 
6EQ 8s 
ERROR +3 
JSR R?,DATVER 
TST @eCOUNT 
BEQ as 
ERROR +3 
LOD (R4), ACO 
SUBD - (R4) ACO 
STFPS RB 
CMP 040204 ,R3 
BEG as 
ERROR «3 
STD ACD, (R1) 
JSR R7,DATVER 
TST COUNT 
BEQ S$ 
ERROR +3 
LOFPS 00 
LOD (R4), ACO 
SUBF  (R4) ACO 
STFPS RB 
STO ACO,(RL) 
CMP 04,R3 
BEQ 6$ 
ERROR «3 
JSR R7?,DATVER 
TST COUNT 
BEQ 1s 
ERROR +3 


3FPP 
;BAD 


3FPP 
:BAD 


;FPP 
:BAD 


3F PP 
3:BAD 


3F PP 
;8AD 


3FPP 
3BAD 


sBRANCH IF GOOD 
ERROR 
FPP STATUS 
sPOINT TO RECEIVERD DATA 
sSAVE DATA 
;VERIFY DATA 


8 

sBRANCH IF GOOD 
ERROR 
DATA IN ACO 

3LOAD FLOATING STATUS 


3 
sLOAD ACO WITH O 
s¢TEST INSTRUCTION 
sSAVE DATA 
sSAVE FPS 
sVERFIy STATUS 
sBRANCH IF GOOD 
ERROR 
FPS 
;VERFIy DATA 
;VERIFY RESULT 
sBRANCH IF GOOD 
ERROR 
ACO 
sSETUP DATA 
seTEST INSTRUCTION 
sSAVE STATUS 
s;VERFIv STATUS 
sBRANCH IF GOOD 
ERROR 
FPS 
sSAVE ACO DATA 
sVERFIy DATA 


; 

sBRANCH IF GOOD 
ERROR 
ACO 


sSTORE FPP STATUS 


3FPP 
3BAD 


sLOAD ACO 


30-0 
sSAVE STATUS 
;SAVE ACO 
sVERFIy STATUS 
sBRANCH IF GOOD 
ERROR 
FPS 
sVERIFyY DATAT 


: 
sBRANC IF GOOD 


;FPP 
3BAD 


ERROR 
ACO 


SEQ 0223 


Ee 
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COKDAB.P 11 O05 -APR-84 16:45 FLOATING POINT TESTS SEQ 0224 
12336 ' 
Co: 5 i rr i: A Ps en for ee ete er te eS ate 
12338 iTEST ADDF ,SUBD - FSRC=0, ACO NE O 
12339 ; 
12340 ; 
12341 3 
1234) Hy 
12343 06 142 MNNRMO : 
12344 
12345 3 
12346 061142 012701 003102 MOV MRECDOST,R1 sPOINT TO RECEIVED DATA TABLE 
12347 061146 012705 003254 MOV #TABE,RS sPOINT TO SOURCE DATA TABLE 
12348 061152 012704 003204 MOV #TAB2,R4 sPOINT TO ACO DATA 
12349 061156 170127 000200 LOFPS #200 :SET TO DOUBLE FOR CLEAR 
12350 061162 172415 LOD (RS),ACO 3 
12351 061164 005002 CLR Re ;SETUP FPP STATUS 
12352 061166 170102 LOFPS Re 3LOAD FPS 
12353 061170 172414 LOF (R4),ACO 3LOAD ACO 
12354 061172 172015 ADDF CRS), ACO 3¢TEST INSTRUCTION 
12355 061174 170203 STFPSR3 sSAVE STATUS 
12356 061176 174011 STF ACO,(R1) sSAVE ACO 
12357 061200 022703 000000 CMP #0,R3 sVERFIY NEGATIVE RESULT 
12358 061204 001401 BEQ 1$ ;BRANCH IF GOOD 
12359 061206 104003 ERROR 3 3;FPP ERROR 
12360 ;BAD FPS 
12361 061210 012704 003224 1$: MOV @TAB4 ,.R4 sPOINT TO EXPECTED DATA 
12362 061214 004767 052242 JSR R7,DATVER ;VERFIy ACO 
12363 061220 005767 121634 TST COUNT ;CHECK RESULT 
12364 061224 001401 BEQ es ;BRANCH IF GOOD 
12365 061226 104003 ERROR +3 3;FPP ERROR 
12366 ;BAD ACO 
12367 061230 170127 000200 2s: LOFPS #200 3SET STATUS TO DUOBLE NODE 
12368 061234 172414 LOD (R4),ACO 3LOAD ACO WITH A VALUE 
12369 061236 173015 SUBD CRS5),ACO s@TEST INSTRUCTION 
12370 061240 170203 STFPS R3 sSAVE FPP STATUS 
12371 061242 174011 STO ACO,(R1) sSAVE ACO 
12372 061244 022703 000200 CMP 9200 ,R3 ;VERIFY RESULT 
12373 061250 001401 BEQ 3$ sBRANCH IF GOOD 
12374 061252 104003 ERROR +3 3;FPP ERROR 
12375 BAD SUBD 
12376 061254 012704 003224 3$: MOV #TABS,R4 sPOINT TO EXPECTED 
12377 061260 004767 052176 JSR R7,DATVER :VERIFY ATO 
12378 061264 005767 121570 TsT COUNT 3 
12379 061270 001401 BEQ 4$ ;BRANCH IF GOOD ACO 
12380 061272 104003 ERROR 3 3FPP ERROR 
12381 ;BAD ACO 
12382 061274 43; 
12383 
12384 
12385 ; 
12386 3 
12387 a ysdnbst Rakesh cdmes Diag revs Tas 
12388 TEST “ADOD, SUBF FSRC NE O, ACO-0 
12389 ; 


12390 ; 
12391 H 


COKDABO KDNJ11 B CLUSTER 
COKDAB.P 11 05 -APR -84 


061274 


061274 
061300 
061304 
061310 
061314 
061316 
061320 
061322 
061324 
061326 
061332 
061334 


061416 


061416 
061422 
061424 
061430 
061434 


012701 
012705 
012704 
012702 
170102 
172415 
172014 
170203 
174011 
022703 
001401 
104003 


004767 
005767 
001401 
104003 


170127 
172415 
173014 
170203 
174011 
022703 
001401 
104003 


012704 
004767 
005767 
001401 
104003 


012702 
170102 
012704 
012705 
012701 


MACY11 30( 1046) 
16:45 


000210 


052120 
121512 


000200 


000200 


003444 
052054 
121446 


003240 


003274 
003304 
003102 


F2 
Cc. 
05-APR-84 16:45 PAGE 226 
FLOATING POINT TESTS 


MNNRM3; 

H 
MOV #RECDST,R1 
MOV #TAB6 RS 
MOV @TAB1,R4 
MOV #200 ,R2 
LOFPS R 
LOD CRS), ACO 
ODD (R4),ACO 
STFPS R3 
std ACO,¢R1) 
CMP #210,R3 
BEQ 1$ 
ERROR 3 

1$: JSR R7,DATVER 
TST COUNT 
BEQ 2s 
ERROR 3 

2s: LOFPS #200 
LOF CRS),ACO 
SUBD (R4),ACO 
STFPS R3 
STF ACO,C(R1) 
CMP #200 ,R3 
BEQ 3$ 
ERROR +3 

3$: MOV #TAB18,R4 
JSR R7,DATVER 
TST COUNT 
BEG 4$ 
ERROR +3 

4$; 

H 

; 

3 -“_--s*=—= = **e eee ewene ones e+ ew eweeweeeeneee 

sTEST ADOF, SUBD - 

Hy 
3 
; 
3 

MNNRM4 

3 
MOV #3240,R2 
LDFPS R2 
MOV #TAB7,R4 
MOV #TABB,RS 
MOV MRECDST,R1 


sPOINT TO RECEIVED DATA TABLE 
sPOINT TO ACO DATA TABLE 
sPOINT TO FSRC DATA 
;SETUP FPP STATUS 
;LOAD FPS 
3LOAD ACO 
3@TEST INSTRUCTION 

sSAVE STATUS 
sSAVE ACO 
;VERFIY NEGAT've RESULT 
;BRANCH IF GOOD 

3—FPP ERROR 

;BAD FPS 

sVERFIY ACO 

s;CHECK RESULT 
;BRANCH IF GOOD 

3FPP ERROR 

:BAD ACO 

;SET STATUS TO DUOBLE NODE 
sLOAD ACO WITH A VALUE 
s@TEST INSTRUCTION 
s;SAVE FPP STATUS 


sSAVE ACO 
sVERIFY RESULT 
sBRANCH IF GOOD 
3FPP ERROR 
;BAD SUBD 
sPOINT TO EXPECTED DATA 
sVERIFY ACO 


;BRANCH IF GOOD ACO 
3FPP ERROR 
3;B8AD ACO 


sSET FIU,FD,FT 


3SET FSRC 
3SETUP ACO 
sPOINT TO RECEIVED DATA 


SEG 0225 


COKDABO KDJ11-B CLUSTER 


COKDAB.P 11 


12448 
12449 
12450 
12451 
12452 
12453 
12454 
12455 
12456 
12457 
12458 
12459 
12460 
12461 
12462 
12463 
12464 
12465 
12466 
12467 
12468 
12469 
12470 
12471 
12472 
12473 
12474 
12475 
12470 
12477 
12478 
12479 
12480 
12481 
12482 
12483 
12484 
12485 
12486 
12487 
12488 
12489 
12490 
12491 
12492 
12493 
12494 
12495 
12496 
12497 
12498 
12499 
12500 
12501 
12502 
12503 


061440 
061442 
061444 
001446 
061452 
061456 
061462 
061464 


061466 
061472 
061476 
061502 
061504 
061506 
061510 
061512 
061516 
061522 
061524 


061526 


05 - APR -84 


172415 
172014 
174011 
012704 
004767 
005767 
001401 
104003 


012704 
012703 
012702 
170102 
172413 
061400 
174011 
004767 
005767 
001401 
104003 


012702 
170102 
012704 
012701 
012705 
172415 
172014 
170203 
174011 
022703 
001401 
104003 


012704 
004767 
005767 
001401 
1040035 


012704 
172415 


MACY11 30( 1046) 
16:45 


003314 
052004 
121376 


003304 
003304 
003200 


051744 
121336 


003200 
0033534 


003102 
003324 


003200 


003344 
051662 
121254 


003354 


Ge 


O5-APR-84 16:45 PAGE 227 

FLOATING POINT TESTS 
LOD CRS),ACO 
ADOD (R4),ACO 
STD ACO,C(R1L) 
MOV #TAB9,R4 
JSR R7,DATVER 
TsT COUNT 
BEQ 1$ 
ERROR 3 

1$; MOV @TABS,R4 
MOV @TABS,R3 
MOV #3200 ,R2 
LOFPS Re 
LOD (R3),ACO 
ADD (R4),ACO 
STD ACO,C(R1) 
JSR R7,DATVER 
TST COUNT 
BEQ es 
ERROR 3 

2s: 


MXDF 1: 

° 
MOV #3200 ,R2 
LOFPS Re2 
MOV #TAB11,R4 
MOV @RECDST,R1 
MOV @TAB1O,RS 
LOO CRS),ACO 
ADDD (R4),ACO 
STFPS R3 
STO ACO,(R1) 
CMP #3200,R3 
BEQ 1$ 
ERROR +3 

1%: MOV @TAB1L1A,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 2s 
ERROR +3 

2s; MOV @TABL2 ,R4 


LDOD (RS), ACO 


sLOAD ACO 

s#TEST INSTRUCTION 

sSAVE TEST RESULT 

sPOINT TO EXPECTED DATA 
;VERIFY ACO DATA 


‘ 

sBRANCH IF GOOD 
3FPP ERROR 
;BAD ADDD 


6 
sSETUP SAME ACO 
sROUND MODE 


sLOAD ACO 

3¢TEST INSTRUCTION 
sSAVE DATA 

;VERIFY ACO 


;BRANCH IF GOOD 
;FPP ERROR 
3BAD ROUND RESULT 


3R2=FPP STATUS 
;LOAD FPS STATUS 
sPOINT TO FSRC DATA 
sPOINT TO ACO RESULT 
sPOINT TO ACO DATA 
;LOAD ACO DATA 
s¢TEST INSTRUCTIONS 
;SAVE FPP STATUS 
sSAVE ACO DATA ; 
;VERIFY FPP STATUS 
;BRANCH IF GOOD 

3FPP ERROR 

:;BAD FPP STATUS 
sPOINT TO EXPECTED DATA 
sVERIFy CONTENTS OF ACO 


3 
;BRANCH IF GOOD ACO 

3FPP ERROR 

;BAD ACO, SHOULD = FSRC 
sPOINT TO FSRC DATA 
3ACO 


SEQ 0226 


COKDABO KDJ11-B CLUSTER MACY11 30( 1046) 


COKDAB .P11 


12549 061746 


12552 061746 
12553 061752 
12554 061754 
12555 061760 
12556 061762 
12557 061764 
12558 061766 
12559 061772 


O05 - APR -84 


172014 
012704 
174011 
004767 
005767 
001401 
104003 


012702 
012704 
012705 
172415 
170102 
172014 
170127 
174011 
012704 
004767 
005767 
001401 
104003 


012705 
170102 
172415 
172014 
174011 
012704 
004767 
005767 
001401 
104003 


012702 
170102 
012704 
172414 
172014 
170203 
012701 
174011 


16:45 


003374 


051630 
121222 


003000 
003404 
003414 


000200 
003324 


051560 
121152 


003424 


003434 
051524 
121116 


003200 
003454 


003102 


OS-APR-84 16:45 PAGE 228 
FLOATING POINT TESTS 


38; MOV 


4$: MOV 


S$: 


;TEST ADDD WITH NEGATIVE OPERANDS 


3 
MNGOP ; 


(R4),ACO 
®TAB13B,R4 
ACO,(R1) 
R7,DATVER 
COUNT 


3$ 
+3 


#3000 ,R2 
#TAB14,R4 
#TAB15,R5 
(RS),ACO 


Re 
(R4),ACO 
#200 

Aco, (R1) 
#TAB10,R4 
R7,DATVER 
COUNT 

as 

+3 
#TAB16,R5 
Re 


CRS), ACO 
CR4),ACO 
ACO,(R1) 
@TAB17,R4 
R?7,DATVER 
COUNT 

S$ 

+3 


#3200,R2 
Re 
@TAB21,R4 
(R4),ACO 
(R4),ACO 


#RECDST,R1 
ACO,(R1) 


D 
w 


3¢TEST INSTRUCTION 

sPOINT TO EXPECTED RESULT 
s;SAVE ACO DATA INTO RECDAT 
;VERIFY DATA 


sBRANCH IF GOOD DATA 


3FPP ERROR 
sBAD ACO DATA 


3;GET FPP STATUS DATA 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
;LOAD ACO 
3FPP STATUS = FLOAT, INTERRUPTS ENABLE 
:#TEST INSTRUCTION 
sRESET TO DOUBLE 
;RECOST=ACO 
sPOINT TO GOOD DATA 
;VERFIy CONTENTS OF ACC 


e 
;BRANCH IF GOOD 


3FPP ERROR 
;BAD FLOATING ADD 


sPOINT TO ACO DATA 

3FPP STATUS = FLOAT 

sLOAD ACO 

s*¢TEST INSTRUCTION 
sSAVE ACO DATA 

sPOINT TO GOOD DATA 


;BRANCH IF GOOD 


3FPP ERROR 
3BAD FLOATING ADO 


;LOAD FPS VALUE 


3 

sDATA ADDRESS FOR ACO AND FSR 
:ACO=100200 0 0 O 

3@TEST INSTRUCTION 

sSAVE STATUS 

sPOINT TO RECEIVED DATA TABLE 
sSAvE ACO DATA 


SEQ 0227 


COKDABO KDJ11-B CLUSTER 


COKDAB.P11 


12614 
12615 


OS - APR - 84 


022703 
001401 
104003 


012704 
004 767 
005767 
001401 
104003 


170203 
012701 
174011 
022703 
001401 
104003 


012605 
020527 
001401 
104003 


005726 
012704 
004767 
005767 
001401 
104003 


012704 


170203 
012701 
174011 
022703 
001401 
104002 


MACY11 30( 1046) 


16:45 
003210 


003464 
05144€ 
121040 


003454 
003474 
062052 


003102 
103200 


062046 


003504 
051344 
120736 


003474 
003454 
062162 
003200 


003102 
103200 


000244 


000244 


OS - APR -84 


FLOATING POINT TESTS 


1$: 


es: 


100$: 


101%: 


3$; 


102%: 


4$; 


103$: 


104%; 


CMP 
BEQ 
ERROR 


#3210,R3 
1$ 
+3 


#TAB22,R4 
R7,DATVER 
COUNT 

es 

+3 


!-FSRC! = !ACO! 


@TAB21,R4 
&TAB23,R1 


#101$ , QF PVEC 


(R1),ACO 
(R4),ACO 


+3 


R3 
@RECOST,R1 
ACO,(R1) 
rience 


+3 


(SP)+,RS 
RS, #1008 


(SP )+ 
#TAB24 ,R4 
R7,D0ATVER 
COUNT 

4s 

+3 


$-ACO! = !FSRC! 


@TAB23,R4 
#TAB21,R1 


0104$ ,QeF PVEC 


#3200,R2 
R2 

(R1),ACO 
(R4),ACO 


3 


R3 

@RECDST ,R1 
ACO,(R1) 
#103200 ,R3 
a 


[ec 


16:45 PAGE 229 


;VERIFY STATUS 
sBRANCH IF GOOD 
3FPP ERROR 
: 


sPOINT TO EXPECTED DATA 


é 

;VERIFY DATA 

;BRANCH IF GOOD 
3FPP ERROR 


sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
;SETUP FP VECTOR 
;LOAD ACO 
s*¢TEST INSTRUCTION 
;COPY FPP CC 
3;—-PP ERROR 
:GO TO ERROR 
s;SAVE FPP STATUS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO DATA 
sVERIFY STATUS 
;BRANCH IF GOOD 
3FPP ERROR 
;BAD STATUS 
;GET ERROR PC 
;VERIFY ERROR ADDRESS ON STACK 
;BRANCH IF GOOD 
;FPP ERROR 
;BAD ERROR RETURN ON STACK 
sRESTORE STACK 
sPOINT TO EXPECTED DATA TABLE 
;VERIFY DATA 


sBRANC IF GOOD 
3-PP ERROR 
sBAD ACO DATA 


sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sSETUP FP VECTOR 
3LOAD FPS VALUE 


3 
;LOAD ACO DATA 
3#TEST INSTRUCTION 
;COPY FPP CC 

3FPP ERROR 

3GO TO ERROR 
sSAVE FPS 
sSAVE ACO 


a 
sVERFIy STATUS 
sBRANCH IF GOOD 
3FPP ERROR 
;BAD FPS STATUS 


SEQ 0228 


COKDABO KDJ11 B CLUSTER 


COKDAB.P11 


OS - APR - 84 


012605 
020527 
001401 
104003 


005726 
012704 
004767 
005767 
001401 
104003 


012704 
012701 
012702 
170102 
012737 
172411 
172014 
170203 
012701 


172014 


MACY11 30( 1046) 


16:45 


062156 


003504 
051234 
120626 


003524 
003514 
003200 


000246 


003102 
003200 


003534 
051144 
120536 


003514 
003524 


003102 
003200 


003534 
051070 
120462 


003554 
003544 


000244 


Je 


O5S-APR-84 16:45 PAGE 230 
FLOATING POINT TESTS 
S$: MOV (SP)+,R5 
CMP R5,%103$ 
BEQ 105$ 
ERROR +3 
105$: TST (SP )> 
MOV @TAB24 ,R4 
JSR R7,DATVER 
TsT COUNT 
BEQ 6$ 
ERROR 3 
; !-FSRC! < 
6$: MOV #TAB26 ,R4 
MOV #TAB2S,R1 
1] #3200 ,R2 
LOFPS Ro 
MOV 9246 , AOFPVEC 
LOD (R1),ACO 
ADDD (R4),ACO 
STFPS R3 
MOV MRECDST,R1 
STD ACO,C(R1) 
CMP R3, #3200 
BEQ 7$ 
ERROR 3 
7$: MOV #TAB27,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 8$ 
ERROR 3 
3 tFSRC! > 
8$: MOV #TAB2S ,R4 
MOV @TAB26,R1 
LOD (R1),ACO 
ADDD (R4),ACO 
STFPS R3 
MOV #RECDST,R1 
STD ACO,(R1) 
CMP R3, 23200 
BEQ 9$ 
ERROR 3 
9%: MOV #TAB27,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 10$ 
ERROR 3 
3 $-FSRC! « 
108: MOV #TAB29,R4 
MOV #TAB28,R1 
LOD (R1),ACO 
ADDD (R4),ACO 


sGET ERROR PC 
sVERIFY ERROR ADDRESS ON STACI 
sBRANCH IF GOOD 
3FPP ERROR 
sBAD ERROR RETURN ON STACK 
sRESTORE STACK 
sPOINT TO EXPECTED DATA 


3 
;BRANCH IF GOOD 
;FPP ERROR 
sBAD ACO 
!ACO! 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
3LOAD FPS VALUE 


3 
;SETUP FP VECTOR 
sLOAD ACO DATA 
3#TEST INSTRUCTION 
sSAVE STATUS 
sPOINT TO RECEIVED DATA TABLE 
;SAVE ACO 
sVERIFY STATUS 
;BRANCH IF GOOD 
;FPP ERROR 
sBAD FPS 
sPOINT TO EXPECTED DSATA 
;VERIFY DATA 


3 
sBRANCH IF GOOD 
3FPP ERROR 


tac! 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sLOAD ACO DATA 
3*TEST INSTRUCTION 
sSAVE STATUS 
sPOINT TO RECEIVED DATA TABLE 
3SAVE ACO 
;VERIFY STATUS 
;BRANCH IF GOOD 
3FPP ERROR 
3BAD FPS 
sPOINT TO EXPECTED DSATA 
;VERIFY DATA 


3 
;BRANCH IF GOUD 
3;FPP ERROR 
;BAD ACO 
'Aco! { 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
;L0AD ACO DATA 
:¢TEST INSTRUCTION 


SEQ 0229 


COKDABO KNJ11-8 
COKDAB.P11 


12672 
12673 
12674 
12675 
12676 
12677 
12678 
12679 


05 - AP 


CLUSTER 
APR - 


170203 
012701 
174011 
020327 
001401 
104003 


012704 
004767 
005767 
001401 
104003 


012702 
170102 


MACY11 30.1046) 
84 16:45 


003102 
003200 


003564 
051014 
120406 


003200 


003454 
003102 


003204 


003254 
050736 
120330 


003404 


003204 


003254 


Ke 


‘ é.. 


O5-APR-84 16:45 PAGE 231 
FLOATING POINT TESTS 
STFPS R3 
MOV #RECDST,R1 
sto ACcO,C(R1) 
CMP R3, #3200 
BEQ 11$ 
ERROR +3 ;FPP 
;BAD 
11$: MOV @TAB29A,R4 
JSR R7,DATVER 
TST COUNT 
BEQ l2$ 
ERROR 3 3FPP 
° 
128: 


;TEST SUB WITH EXP[ACO)=EXP[FSRC] 


MSB: 
é 
V #3200 ,R2 
LOFPS R2 
MOV #TAB21,R4 
MOV #RECDST,R1 
LOD (R4),ACO 
SUBD (R4),ACO 
STFPS R3 
STO ACO,(R1) 
CMP #3204 ,R3 
BEQ 1$ 
ERROR +3 3FPP 
;BAD 
1$: MOV #TAB6,R4 
JSR R7,DATVER 
TsT COUNT 
BEQ 2s 
ERROR +3 3F PP 
;BAD 
2s: MOV #TAB14,R4 
LOD (R4),ACO 
SUBD (R4),ACO 
STFPS R3 
STO ACO,(R1) 
CMP #3204 ,R3 
BEQ 3$ 
ERROR 3 3;FPP 
;BAD 
3$; MOV #TAB6 ,R4 


sSAVE STATUS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO 
;VERIFY STATUS 
sBRANCH IF GOOD 
ERROR 


FPS 
sPOINT TO EXPECTED DATA 
;VERIFY DATA 


; 
s;BRANCH IF GOOD 
ERROR 


;LOAD FPS DATA 
3LOAD FPS 
sPOINT TO FSRC DATA 
sPOINT TO ACO RECEIVED DATA TABLE 
3LOAD ACO 
s@TEST INSTRUCTION 
sSAVE STATUS 
sSAVE ACO INTO RECDST 
;VERIFY STATUS 
;BRANCH IF GOOD 
ERROR 
FPS STATUS 
sPOINT TO EXPECTED DATA 
;VERIFY ACO 


sBRANCH IF GOOD 
ERROR 
ACO 
sPOINT TO FSRC AND ACO DATA 
3LOAD ACO DATA 
;*TES! INSTRUCTION 


sSAVE FPS 
sSAVE ACO INTO RECDS’ 
;VERIFY FPS 
;BRANCH IF GOOD 
ERROR 
ACO 
sPOLNT TO EXPECTED DATA 


SEQ 0230 


COKDABO KDJ11-B 


COKDAB.P11 


062564 
062570 
062574 
062576 


062600 


0S - APR 


004 767 
005767 
001401 
104003 


012702 
170102 
012705 
012701 
172411 
173015 


170203 
012704 
174014 
012701 
004767 
005767 
001401 
104003 


012701 
012705 
172411 
173015 


012701 
174011 
004767 
005767 
001401 
104003 


CLUSTER MACY11 30( 1046) 
-84 16:45 


0506 72 
120264 


003200 


003604 
003574 


003102 
003634 


050620 
120212 


003614 
003624 


003102 


050562 
120154 


Le 
; 


;VERIFY ACO 


sBRANCH IF GOOD 
;FPP ERROR 
sBAD ACO 


;LOAD FPS 


sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
;LOAD ACO 
3*TEST INSTRUCTION 
31 LEFT SHIFT 
sSAVE STATUS 
sPOINT “ RECDATA 
SAVE ACO 
sPOINT 10 EXPECTED DATA 
sVERIFY DATA 


s;BRANCH IF GOOD 


3;FPP ERROR 
3 
sACO DATA 
3sFSRC DATA 
sLOAD ACO 


3¢TST INSTRUCTION 

356 LEFT SHIFTS 
sSAVE DATA 
é 


é 
3;FPP ERROR 
; 


05 - APR - 84 6:45 PAGE 232 

FLOATING SBOINT TESTS 
JSR R7,DATVER 
TST COUNT 
BEQ 4$ 
ERROR 3 

4$: 

3 

: 

3 

Teer Tre et fy eee 

3; TEST NORMALIZE 

3 
3 
3 
3 

MNRM: 

Fy 
MOV #3200 ,R2 
LDFPS Ro 
MOV #TAB31,R5 
MOV #TAB30,R1 
LOD (R1),ACO 
SUBD CR5),ACO 
STFPS R3 
MOV @RECDST ,R4 
STO ACO,(R4) 
MOV #TAB34,R1 
JSR R7,DATVER 
TST COUNT 
BEQ 1$ 
ERROR +3 

1$: MCY #TAB3S2,R1 
MOV #TAB33,R5 
LOD (R1),ACO 
SUBD CRS), ACO 
MOV #RECDST,R1 
STD ACO,(R1) 
JSR R7,DATVER 
TST COUNT 
BEQ 2$ 
ERROR +3 

2s; 


;TEST ADDD WITH 
3 

; 

; 


OVERFLOW AND “UNDERFL OW 


SEQ 0231 


COKDABO KDJ11 8 wr MACY11 30( 1046) erie APR -84 
0S -APR-84 16:45 


COKDAB.P11 


12784 
12785 
12786 
12787 
12788 
12789 
12790 
12791 
12792 
12793 
12794 
12795 
12796 
12797 


062710 


062710 
062714 
062716 
062722 
062726 
062730 

2732 
062734 
062740 
062742 
062 746 
062750 


062752 
062756 
062762 


062766 
062770 


012702 
170102 
012704 
012701 
172411 
172014 
170203 
012701 


063022 


003254 
050370 
117762 


000200 


000244 


Me 


16:45 PAGE 235 


FLOATING POINT TESTS 


MUVAD: 


1$: 


23s: 


3$: 


4$: 


S$: 


7$: 


MOV #200 ,R2 
LOFPS Re 
MOV #TAB40,R4 
MOV #TAB40,R1 
LOD €R1),ACO 
ADOD CR4),ACO 
STFPS R3 
MOV #RECOST,R1 
STD ACO,(R1) 
CMP #206 ,R3 
BEQ 1$ 
ERROR +3 
MOV #TAB6,R4 
JSR R7,DATVER 
TST COUNT 
BEQ es 
ERROR +3 
ENABLED 
Vv #1200,R2 
LOFPS R2 
MOV @TAB40,R4 
MOV #TAB40,R1 
LOD €R1),ACO 
MOV 3$ ,d0FPVEC 
ADDD (R4),ACO 
CFCC 
ERROR +3 
STFPS R3 
MOV #RECDST,R1 
STO ACO,CRL) 
CMP #101206 ,R3 
BEQ 4$ 
ERROR 3 
MOV (SP )+,RO 
CMP #23%,RO 
BEQ 5$ 
ERROR 3 
MOV (SP)+,RO 
MOV ¢TAB6 ,R4 
JSR R7,DATVER 
TsT COUNT 
BEQ 7$ 
ERROR 3 
;UNDERFLOW TRAPS DISABLED 
MOV #200 ,R2 
LOFPS R2 


sSETUP FLOATING POINT STATUS 
;LOAD FPS 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sLOAD ACO WITH TEST DATA 
3*TEST INSTRUCTION 
sSAVE FPS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
;VERIFY STATUS 
;BRANCH IF GOOD 
;FPP ERROR 
;BAD FPS 
sPOINT TO EXPECTED DATA 
;VERIFY DATA 


;sBRANCH IF GOOD 
3;FPP ERROR 
;BAD ACO 


;SETUP FLOATING POINT STATUS 
sLOAD FPS 

sPOINT TO FSRC DATA 

sPOINT TO ACO DATA 

3LOAD ACO WITH TEST DATA 
sCHANGE TRAP VECTOR 
:*TEST INSTRUCTION 


;FPP ERROR 
;FAILED TO TRAP ON OVERFLOW 
sSAVE FPS 
sPOINT TO RECEIVED DATA TABLE 
;SAVE ACO RESULT 
;VERIFY STATUS 
sBRANCH IF GOOD 
3FPP ERROR 
;BAD FPS 
;CHECK STORED PC 


;BRANCH IF RETURN ADDRESS IS GOOD 
3FPP ERROR 
;BAD RETURN ADDRESS 
;CLEAN UP STACK 
sPOINT TO EXPECTED DATA 
;VERIFY DATA 


;BRANCH IF GOOD 
;Fe¥P ERROR 
;BAD ACO 


3SETUP FLOATING POINT STATUS 
sLOAD FPS 


SEQ 0232 


peoeee | <“DJ11 6 CLUSTER “AC111 $01 1046) 
COKD48 P11 45 


1oaeo 
12841 
12842 
126458 


126588 


HEH 


itt 


PREETI Lit LiL Sreeerekee 


OS APA 84 16: 


133426 000244 
003274 
Ov 5654 


003102 


Ne 


OS -APR-84 16:45 PAGE 254 
FLOATING POINT TESTS 

OV OWL_DTRP , Bef PVEC 

Ov eTAB7 Ra 

Ov @TAB41,R1 

Loo (R1), ACO 

ad00 (R4), ACO 

sTFPS) RS 

Ov ORECOST AL 

STO ACO,CR1) 

ch 0204 ,R3 

BEG as 

Een «8 
es: Ov eTABo .R4 

JR R?. DATVER 

Ts? COunT 

BEO 7} 

GBaNS +3 
sUNDERFL Ow TRAPS ENABLED 
8: Ov @2200 ,82 

iorPS) RA? 

Oe @118. ae PvEC 

"Ov rh, oe | 

Ov @7A841 Ri 

ido (@1).aco 

4000 (a4), aco 
108: crce 

£29 -3 
118: sTres —OoaaS 

Ov eRECOST a1 

s?o0 aco.( Ri) 

c- #102210.83 

stc 12s 

‘(oe +3 
128: Ov CH )- a5 

c- @5. 21085 

os iss 

(ae -8 

Oe e'eBS4 84 

JS a’ Datvee 

ts? cous! 

Os 145 

eos 4 
gs BOER. Oe wll "RAPS OISMED - 
1458: Ou M2 

wes 

Ow Ou_DOTRP ger PvE c 

Oe O° aS ad 

Or eT B42 81 

Loo (@1).4co 

“000 (a4). aco 


SEG 0233 


sREPLACE WILD TRAP vECTOR 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
s;LOAD ACO WITH TEST DATA 
po ee 
3SAVE F 
sPOINT 10 RECEIVED DATA TABLE 
;SAVE ACO RESULT 
s;VERIF Y STATUS 
ANCH IF GOOD 


sPOINT TO EXPECTED LATA 
sVERIFY DATA 


s;BRANCH IF GOOD 
RROR 


sSETUP FLOATING POINT STATUS 
3sLOAD FPS 
sREPOSITION TRAP VECTOR 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sL0AD ACO wITe TES’ DATA 
seTEST INSTRUCTION 
;COPTy FPP Cc 
FFP ERROR 
sFAILED TO |mAP ON UNDERFLOW 
sSAVE FPS 
sPOINT 10 RECEIVED DATA TARE 
sSAVE ACO RESULT 
sVERIFs STATUS 
;BRanCH IF GOOD 
;feP ERROR 
3840 FPS 
;GE* ERROR PC 
sVERIF+ ERROR ADORESS ON STACK 
Grace IF GOOD 


F 
se ERROR 
sBAD ERROR RETURN ON STACK 
sMESTORE STACK 
sPOINT TO EXPECTED DATA 
sVERIF + Data 


;OR40C If GOOD 
Led eal 


€ 
aco 
ZERO @ESAT 
a _ POINT STATUS 


Hw 08D & 
sRESTORE TRAP VECTOR 
sPOINT TO F SRC DATA 
sPOINT TO ACO DATA 
sLO@D ACO wile TES” DATS 
sete st INS T@UCTION 


em. 


,f Pe 
BaD 
wm 


COKDABO KDJ11 8B CLUSTER 
O05 - APR - 84 


COKDAB P11 


12896 063332 
12897 063334 


12950 064502 


170203 
012701 
174011 
022703 
001401 
104008 


012704 
00476? 
005767 
001401 
104003 


012702 
170102 


022703 
001401 
104003 


012704 
004 767 
005767 
001401 
104003 


MACY11 380( 1046) 
16:45 


003102 


003102 


063422 


102204 


003674 
047770 
117362 


000244 


4 


OS -APR-84 16:45 PAGE 235 
FLOATING POINT TESTS 


STFPS R3 sSAVE FPS 
MOV ORECOST,R1 sPOINT TO RECEIVED DATA TABLE 
STO ACO,(R1L) sSAVE ACO RESULT 
CMP 0204 ,R5 sVERIFY STATUS 
BEQ 15$ sBRANCH IF GOOD 
ERROR 3 3FPP ERROR 
sBAD FPS 
158; MOV OTABE,R4 sPOINT TO EXPECTED DATA 
JSR R7,D0ATVER s;VERIFY DATA 
TsT COUNT 
BEQ 168 sBRANCH IF GOOC 
ERROR 3 3FPP ERROR 
3B8AD ACO 


sUNERFLOW WITH TRAPS ENABLED - NON-ZERO RESULT 


168: MOV #102200 ,R2 sSETUP FLOATING POINT STATUS 
LOFPS R2 3LOAD FPS 
MOV 0183 ,aoFPVEC sRESTORE TRAP VECTOR 
MOV @TAB41 ,R4 sPOINT TO FSRE DATA 
MOV @TAB42 ,R1 sPOINT TO ACO DATA 
LOD CR1),ACO sLOAD ACO wITe TEST DATA 
ADODD (R4), ACO se¢TEST INSTRUCTION 
17$: CFCC 
ERROR 3 3FPP ERROR 
;NO TRAP ON UNDERFLOW 
183: STFPS R3 sSAVE FPS 
MOV PRECDST,R1 sPOINT TO RECEIVED DATA TABLE 
STO ACO,(R1) sSAVE ACO RESULT 
MOV (SP )+,RO sSAVE STACK CONTENTS 
TsT (SP )- sCLEAN UP STACK 
CMP @17%,R0 sVERIFY RETURN ADORESS 
BEQ 198 sBRANCH IF GOOD 
ERROR 3 3FPP ERROR 
3BAD RETURN ADDRESS 
198; CMP #102204 ,R8 sVERIFy STATUS 
BEQ 20% sBRANCH IF GOOD 
ERROR 3 3F PP ERROR 
38AD FPS 
208: MOV @TAB4S ,R4 sPOINT TO EXPECTED DATA 
JSR 7,DATVER sVERIF+ DATA 
TsT COUNT 
BEQ 21% sBRANCH IF GOOD 
ERROR 3 3;FPP ERROR 
3B8AD ACO 
218: 


TEST LDCFD, LOCDF 
S 

r 

3 


3 
MLOC: 


SEQ 0234 


COKDABO KDJ1L B CLUSTER MACY1L 800 1046) 
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012702 
170102 
012704 
012701 
172411 
177424 
012701 
174011 
022 704 
001401 
104003 


012704 
004767 
005767 
001401 
104003 


005002 
170102 
012704 
012701 
172411 
177424 
020427 
001401 
104003 


170203 
012701 
174011 
022703 
001401 
104003 


012704 
004767 
005767 
001491 
104003 


012702 


000300 
003704 
003254 
003102 
003710 


003714 
047710 
117302 


003704 
003424 


003754 
047620 
117212 


000200 


043243 


000003 


th, 


OS-APR-84 16:45 PAGE 256 

FLOATING POINT TESTS 

+ 

3 TRUNCATE 
MOV 300 ,R2 
LOFPS Ro 
MOV @TAB4S ,R4 
MOV @TABG,R1 
LOD (R1),ACO 
LOCFO (R4)+, ACO 
MOV @RECDST,R1 
STO ACO,(R1) 
CMP @TAB45+4,R4 
BEQ 1$ 
ERROR 3 

18: MOV @TAB46 ,R4 
JSR R7,DATVER 
TsT COUNT 
BEQ 2s 
ERROR 3 

sAUTO-INC DOUBLE MODE 

es: CLR Ro 
LOFPS R2 
MOV @TAB4S ,R4 
MOV ©TABIG, RL 
LOD (R1),ACO 
LOCOF (R4)-, ACO 
cmp R4, @TAB45+10 
BEQ 3$ 
ERROR 3 

R$; STFPRS R3 
MOV MRECDST,RI1I 
STO ACO,(R1) 
CMP 00 ,R3 
BEQ 4s 
ERROR 3 

4$: MOV @TAB49, RG 
JSR R7,DATVER 
TS? COUNT 
BEG S$ 
ERROR 3 

;LOCFD GR7 

5$: MOV 900 ,RO 
LOFPS Ro 
CLR R53 
LOCFD @5203,ACO 
INC R3 
INC R3 
INC R3 
CMP 03,R3 
BEQ 6$ 
ERROR 3 


3FPP 
sBAD 


;FPP 
3BA0 


3F PP 
;BAD 


3FPP 
3BAD 


3F PP 
3BAD 


3F PP 
3;8AD 


sSETUP FLOATING POINT STATUS 
3LOAD FPS 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sLOAD ACO WITH TEST DATA 
;¢TEST INSTRUCTION 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
sVERIFY AUTO-INC 
sBRANCH IF GOOD AUTO-INC 
ERROR 
AUTO-INC 
sPOINT TO EXPECTED DATA 
;VERIFY DATA 


sBRANCH IF GOOD 
ERROR 
ACO 


sSETUP FLOATING POINT STATUS 
sLOAD FPS 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sLOAD ACO WITH TEST Data 
seTEST INSTRUCTION 
sVERIFY AUTO-INC 
sBRANCH IF GOOD 
ERROR 
AUTO-INC ON DOUBLE 
sSAVE FPS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
sVERIFy STATUS 
sBRANCH IF GOOD 
ERROR 
FPS 
sPOINT TO EXPECTED DATA 
sVERIFY DATA 


;BRANCH IF GOOD 
ERROR 
Aco 


sSETUP FLOATING POIN! STATUS 
sLOAD FPS 


seTEST INSTRUCTION 


sIF LOCFO WORKED, RS SHOULD: 
sVERIFY CORRECT PROGRAM Ft Ow 
sBRANCH IF GOOD 

ERROR 

PROGRAM §1 OW 


SEQ 0235 


COKDABO KNI11 B CLUSTER MACY11 30( 1046) 


COKDAB.P 11 


13009 063704 
13010 063710 
063712 
063716 
13013 063722 


OS-APR-84 10:45 


012702 
170102 
012704 
012701 
172411 
177414 
170203 
012701 
174011 
O22 703 
001401 
104003 


012704 
004767 
005767 
001401 
104003 


012702 
170102 
012704 
012701 
172411 
177414 
170203 
012701 
174011 
022703 
001401 
104003 


C12704 
004767 
005 767 
001401 
104003 


13059 064050 


064050 


00©£037 


200 


003724 
003704 


003102 
000210 


003744 
047504 
117076 


000200 


003254 
003744 


003102 
000204 


003254 
047422 
117014 


002774 


D4 


O5-APR-84 16:45 PAGE 237 
FLOATING POINT TESTS 
sNEGATIVE OPERANDS 
6$: MOV 9200 ,R2 
LOFPS Ro 
MOV @TAB47,R4 
MOV @TAB4S,R1 
LOO (R1),ACO 
LOCFO (R4),ACO 
STFPS R3 
MOV @RECDST,R1 
STO AcO,(R1) 
CMP 9210,R3 
BEQ 7$ 
ERROR 3 

7$: MOV @TAB48 ,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 8$ 
ERROR 3 

;LOAD A ZERO 

8S: MOV 200 ,R2 
LOFPS Ro 
MOV OTABE ,R4 
MOV @TAB48,R1 
LOD (R1L), ACO 
LOCFD (R4),ACO 
STFPS R3 
MOV @RECDST,R1 
STO ACO,(R1) 
CMP 9204 ,R3 
BEQ 9$ 
ERROR 3 

93; MOV @TAB6 ,R4 
JSR R7,DATVER 
TST COUNT 
BEQ 10$ 
ERROR 3 

108; 

é 
3 
3 
A cues s ae a 
3;TEST CMPD 
3 « 

3 
Q 
MCMPD: 


3 
3; CMPD WITH FRSC=ACO-0 


CLR 


@eF LAG 


3FPP 
sBAD 


3FPP 
3BAD 


3F PP 
3BAD 


3F PP 
3BAD 


sSETUP FLOATING POINT STATUS 
sLOAD FPS 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sLOAD ACO WITH TEST DATA 
s¢TEST INSTRUCTION 
s;SAVE FPS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
sVERIFY STATUS 
s;BRANCH IF GOOD 


ERROR 
FPS 
sPOINT TO EXPECTED DATA 
;VERIFY DATA 
sBRANCH IF GOOD 
ERROR 
ACO 
sSETUP FLOATING POINT STATUS 
3LOAD FPS 
sPOINT TO FSRC DATA 
sPOINT TO ACO DATA 
sLOAD ACO WITH TEST DATA 
s@TEST INSTRUCTION 
sSAVE FPS 
sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
s;VERTFY STATUS 
sBRANCH IF GOOD 
ERROR 
FPS 
sPOINT TO EXPECTED DATA 
s;VERIFY DATA 
s;BRANCH TF GOOD 
ERROR 
ACO 


soTGNAL THAT ACO REMAINS CONSTANT 


SEG 0254 


COKDABO KDJ11 8B CLUSTER 
COKDAB.P 11 
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004 767 
000000 
000000 
000000 


000000 
000200 
000204 


012737 
004767 
000000 


MACY11 30( 1046) 


16:45 
000152 
000000 


000030 
177777 


177777 


000116 


000200 
000010 


000020 


012346 


177777 
177777 


F 4 
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FLOATING POINT TESTS 
JSR R7,CMPRIN 
-WORD 0O,0,0,0 
-WORD 0,0,0,9 
«WORD 200 
-WORD 204 

; CMPD WITH EXP[FSRC)]=0, EXP[ACO]=0 
MOV 01,Q0F LAG 
JSR R7,CMPRIN 
«WORD 0,0,0,125252 
. WORD 100,22,123,123 
-WORD 200 
-WORD 204 

3; CMPD FSRC>EXP[ ACO) <0 
CLR @OF LAG 
JSR R7,CMPRTN 
-WORD 400,12346,12346,23 
-WORD 200,0,0,0 
-WORD 200 
-WORD 210 

3; CMPD FSRC*ACO>0 
JSR R7,CMPRTN 
. WORD FUTT7, hahah 
. WORD T7777, -4.-Ls-1 
-WORD 200 
-WORD 204 
JMP HOP44 


sROUTINE TO TEST DATA 
3ACO AT START 


sFSRC AT START 


3sFPS AT START (0D) 
3FPS AT END 


sSIGNAL THAT ACO WILL = O 
sROUTINE TO TEST DATA 
sACO AT START 

sFSRC AT START 


sFPS AT START (D0) 
3FPS AT END 


sACO REMAINS UNCHANGED 
sROUTINE TO TEST DATA 
3ACO AT START 
sFSRC AT START 


sFPS AT START (0) 
3FPS AT END 


sROUTINE TO TEST DATA 
3ACO AT START 


sFSRC AT START 
sFPS AT START (D0) 


3FPS AT END 
sOP OVER SUBROUTINE 


peXeXeXeXeXeXeXeXeXeXeXeXaeXeXexeXeXeXeKexeXxeXeXeXexexeXeXxax 
gOXOXSXOKOKOXSKOKOKXOXOXOXSKSXSXOKXOXOKOK KOK SKSXOKOX OK SK EXOX 


sCOMPARE ROUTINE DATA TABLES 
é 


3 ACO 

F FSRC 

8 FPS BEFORE EXECUTION 
; FPS AFTER EXECUTION 


(FEC) 


sOXeXeKeXeXeXeKeXeKeKeXeKXeXeKXeXeKeXeXeXeXeXeXaXaeXeXaxeXexeax 
gOoXeXeXeXeKeXeXervrexexeKeKXexeXeKeXeXeXeXeKeXexeXeXeKexeXeXen 


é 

CMPRIN: MOV (SP )+,R5 
MOV #200 ,R2 
LOFPS) Re 
MOV RS,R4 
ADD @10,R4 
MOV RS,Ri 
LOD (R1),ACO 


MOV 20(R5),R2 


3s RETURN ADDRESS TO USE AS POINTER 
sSET TO DOUBLE MODE FOR LOAD 

sLOAD FPS 

sPOINT TO FSRC DATA 


‘ 
sPOINT TO ACO DATA 


sLOAD ACO WITH TEST DATA 
3GET TEST FPS 


SEQ 0237 


COKDABO KDJ11-B CLUSTER 
COKDAB.P11 OS - APR -84 


170102 
173414 
170203 
13123 064266 012702 
170102 
13125 064274 012701 
174011 
13127 064302 026503 


13158 064350 012737 
13159 064356 004767 


13169 064412 004767 


MACY11 30( 1046) 
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000200 
003102 
000022 


002776 
003254 


047126 
116520 


000024 


002776 


002776 


z 


OS5-APR-84 16:45 PAGE 239 
FLOATING POINT TESTS 
LOFPS Ro 
1$; CMPD (R4),ACO 
STFPS R3 
MOV #200 ,R2 
LOFPS Re 
MOV MRECOST,R1 
STO AcOo,(R1) 
CMP 22(R5),R3 
BEQ es 
ERROR 3 
es: TST @oFLAG 
BEQ 3$ 
MOV #TAB6,R4 
BR 4$ 
3$; MOV RS,R4 
4$: JSR R7,DATVER 
TST COUNT 
BEQ 5$ 
ERROR 3 
S$: JMP 24(R5) 
HOP44; 
3 
3 
Perere ety Te TP TT eT eee 
sTEST DIVF 
3 
3 
Fy 
MDIVF ; 
Fy 
31/EXP[AC])=FSRC=0 
MOV $2, a0F LAG 
JSR R7,OVF SUB 
. WORD 100,27 
. WORD 0,0 
. WORD 100,27 
. WORD 40000 
. WORD 140000 
. WORD 4 
32/AC =EXP[FSRC)-0 
3; TRAPS ENABLED 
MOV @1,a0F LAG 
JSR R7,OvF SUB 
. WORD 0,0 
WORD 100,0 
. WORD 0,0 
. WORD oO 
. WORD 100000 
» WORD 4 


;LOAD TEST FPS 
3#TEST INSTRUCTION 
sSAVE FPS 

;SET FPP TO DOUBLE 


sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
sVERIFY STATUS 
sBRANCH IF GOOD 

;—PP ERROR 

;BAD FPS 
3;SEE IF ACO REMAINS UNCHANGED 
sBRANCH IF ACO STAYS THE SAME 
3ACO=0 
3;GO VERIFY DATA 
sPOINT TO EXPECTED DATA 

;VERIFY DATA 


sBRANCH IF GOOD 
3FPP ERROR 
sBAD ACO 

;RETURN 


sNO INTERRUPT, BUT FEC 


300 TEST 
sACO 
3sF SRC 
sRESULT 
3; TEST FPS 
sRESULT FPS 
3sFEC 
3s INTERRUPT 
300 TEST 
3ACO 
3F SRC 
sRESULT 
3 TEST FPS 


sRESHT FPS 
sFEC 


SEQ 0238 


COKDABO KDJ11-B8 CLUSTER MACY11 30( 1046) 


COKD OS - APR -84 


ABP 


il 


064440 
064444 
064450 


005037 
004767 
000177 
004100 


000000 
007400 
007404 


012737 
004767 


16:45 


002776 


G4 
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FLOATING POTNT TESTS 


33/F SRC>ACO=0 
CLR @OF LAG 
JSR R7,OVF SUB 
. WORD 177,234 
.WORD 4100,0 
. WORD 0,0 
. WORD Lae 
. WORD 7404 
34/ACO>EXP[FSRC]=0 
MOV #1,90FLAG 
JSR R7,OVF SUB 
. WORD 40200, 104210 
. WORD 125,25252 
. WORD 40200, 104210 
~ WORD 7557 
. WORD phase 
WORD 
:5/EXP(AE]“EXPLF SRC 
@eFLAG 
San R7,OVF SUB 
. WORD 77760, -1 
. WORD 77760,0 
. WORD 40200, 104210 
WORD 7414 
.WORD 7400 
36/AC=F SRC 
CLR @eoF LAG 
JSR R7,OVF SUB 
. WORD 52525 ,52525 
- WORD 52525 ,52525 
. WORD 40200,0 
— 7400 
ORD 7400 
£777 SRC>O<RCO, ROUND 
CLR @eFLAG 
JSR R7,OVF SUB 
. WORD 77777, 125252 
.» WORD 40300,0 
.~ WORD 77652,070707 
. WORD 7400 
wORD 7400 
38/7AC>0<F SRC 
CLR aor LAG 
JSR R7,OVF SUB 
.» WORD $$377,-1 
.- WORD 55300,0 
. WORD 40252,125252 
. WORD i¢) 
. WORD 1?) 
397FSRC>AC>0 
CLR @eFLAG 
JSR R7,OVF SUB 
~ WORD 64600,1 
.WORD 66600 ,0 
.~WORD 36200,1 


sNO INTERRUPT 
300 TEST 


sRESULT FPS 


3s INTERRUPT 
300 TEST 

:ACO 

sF SRC 

sRESULT 

3; TEST FPS 

sRESULT FPS 

3sFEC 


sNO INTERRUPT 


3s TEST FPS 
sRESULT FPS 


3NO INTERRUPT 


3s TEST FPS 
sRESULT FPS 


3NO INTERRUPT 
300 TEST 
3ACO 


sF SRC 

sRESULT 
3s TEST FPS 
sRESULT FPS 


3NO INTERRUPT 
300 TEST 
3ACO 


sF SRC 
sRESULT 

3: TEST FPS 
sRESULT FPS 


3NO INTERRUPT 
300 TEST 
3ACO 


sF SRC 
sRESULT 
3 TEST FPS 


SEQ 0239 


COKDABO KDJ11 B CLUSTER MACY11 30(1046) O5-APR-84 16:4 


COKDAB.P11 


13232 
13233 


064712 000000 


065112 004767 


065146 004767 


O5-APR-84 16:45 


002776 


002776 


H4 
5 PAGE 241 


FLOATING POINT TESTS 
.WORD O 
310/AC>F SRC>O 
CLR BOF LAG 
JSR R7,OVF SUB 
-WORD 12345,156024 
-WORD 05600,0 
-WORD 44745,156024 
-WORD 17 
-WORD O 
311/FSRC<O 
CLR QeF LAG 
JSR R7,OVF SUB 
«WORD 40422,101010 
-WORD 140511,101010 
-WORD 140072,20167 
«WORD 57 
-WORD 50 
312/AC<0 
CLR QeF LAG 
JSR R7,OVF SUB 
-WORD 160077,101 
-WORD 40417,-1 
-WORD 157651,143527 
-WORD 7 
-WORD 10 
313/TRUNCATE TEST 
CLR BOF LAG 
JSR R7,OVF SUB 
-WORD 60100,177 
-WORD 40300,0 
-WORD 60000,124 
-WORD 40 
-WORD 40 
314/ROUND TEST 
CLR @OF LAG 
JSR R7,OVF SUB 
-WORD 60100,177 
-WORD 40300,0 ;FSRC 
-WORD 60000,125 
-WORD O 
-WORD O 
315/0VERFLOW, INTERRUPTS ENABLED 
MOV 01,00FLA 
JSR R7,OVF SUB 
-WORD 177700,0 
«WORD 200,0 
«WORD 137700,0 
-WORD 1100 
-WORD 101112 
-WORD 10 
316/0VERFLOW, TRAPS DISABLED 
MOV 02, Q0F LAG 
JSR R7,OVF SUB 
-WORD 200,0 
. WORD 177700,0 


sRESULT FPS 


3NO INTERRUPT 
3:00 TEST 
3ACO 


sF SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


:NO INTERRUPT 
300 TEST 
3ACO 


s— SRC 

sRESULT 
3: TEST FPS 
sRESULT FPS 


:NO INTERRUPT 
300 TEST 
sACO 


3F SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


3NO INTERRUPT 
300 TEST 
3ACO 


3F SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


3NO INTERRUPT 


300 TEST 
sACO 
sRESULT 
s TEST FPS 
sRESULT FPS 
3s INTERRUPT 
300 TEST 
3;ACO 
3F SRC 
sRESULT 
3; TEST FPS 
sRESULT FPS 
3FEC 
sNO INTERRUPT 
300 TEST 
3ACO 


3* SRC 


SEQ 0240 


2 
[3 
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COKDAB.P11 O5-APR-84 16:45 FLOATING POINT TESTS SEQ 0241 

13288 065162 000000 000000 -WORD 0,0 sRESULT 

13289 065166 041100 -WORD 41100 3 TEST FPS 

13290 065170 041104 -WORD 41104 sRESULT FPS 

13291 065172 000010 «WORD 10 sFEC OVERFLOW 

13292 317/UNDERFLOW, TRAPS ENABLED, UV RESULT 

13293 065174 012737 000001 002775 MOV 01,90F LAG 3s INTERRUPT 

13294 065202 004767 000062 JSR R7,OVF SUB 300 TEST 

13295 065206 100200 000000 «WORD 100200,0 3ACO 

13296 065212 040377 177777 . WORD 40377,-1 sF SRC 

13297 065216 100000 000001 -WORD 100000,1 sRESULT 

13298 065222 002000 «WORD 2000 3; TEST FPS 

13299 065224 102014 -WORD 102014 sRESULT FPS 

13300 065226 000012 -WORD 12 3FEC 

13301 3 18/UNDERFLOW, TRAPS ENABLED, ROUND 

13302 065230 012737 000001 002776 MOV #1,Q80FLAG ; INTERRUPT 

13303 065236 004767 000026 JSR R7,OvF SUB 300 TEST 

13304 065242 030325 025252 -WORD 30325,25252 3Aco 

13305 065246 076777 023456 -WORD 76777,23456 sF SRC 

13306 065252 071525 157716 -WORD 71525,157716 sRESULT 

13307 065256 002537 «WORD 2537 3: TEST FPS 

13308 065260 102500 -WORD 102500 sRESULT FPS 

13309 065262 000012 -WORD 12 sFEC 

13310 ; 

13311 

13312 065264 000167 000212 JMP HOP 10 ;GO TO NEXT TEST 

13313 g OXOXOXOXOXOXEXAXOXHKOXAXAXSXOXOX OX OXOXOX MK ONOXAX AK EK SK OX OX 

13314 g OX OX OX OXAXOXOXOXOKOXOKXOXSKXOXSKXOKXOKXAKXOX MK OX EX SXOKX EX SK OX OX OX 

13315 sOIVF SUBROUTINE: 

13310 3 ACO 

13317 : FSRC 

13318 : FPS BEFORE EXECUTION 

13319 ; FPS AFTER EXECUTION 

13320 : (FEC) 

13321 ; 

13322 g OX OXOXHXAXOXOXEKOKHK EX SK OX SKK OK OK SEKX EX OX OX MX OX SK SX SX SX OX OX 

itees 5 OXOXOXOXOKOXOXeXaXaX OX OX OX OX OX OX XOX OX OXOX OX AXOXOX OX OX OX OX 

4 3 

13325 065270 012605 DVF SUB: MOV (SP )+,R5 ; RETURN ADDRESS TO USE AS POINTER 

13326 065272 012737 065346 000244 MOV #508 ,aeF PVEC sREDIRECT TRAP VECTOR 

13327 065300 012702 000200 MOV #200 ,R2 ;SET TO DOUBLE MODE FOR LOAD 

13328 065304 170102 LOFPS Re ;LOAD FPS 

13329 065306 010504 MOV RS,R4 sPOINT TO FSRC DATA 

13330 065310 062704 000004 ADD €4,R4 

13331 065314 172415 LOD (R5),ACO sLOAD ACO WITH TEST DATA 

13332 065316 016502 000014 MOV 14(R5),R2 3;GET TEST FPS 

ett 065322 170102 LOFPS) Re sLOAD TEST FPS 
: 

13335 065324 174414 DIvF (R4),ACO 3*TEST INSTRUCTION 

fa en Se 18; SETF ;WAIT FOR POSSIBLE FPA TRAP. 
F 

13338 s INSTRUCTION LTONT TRAP 

13339 065330 032737 000001 002776 BIT #1,90F LAG ;VERIFY A NO TRAP CONDITION 

13340 065336 001420 BEQ 2s ;BRANCH IF GOOD 

13341 065340 104003 ERROR °3 ;FPP ERROR 

13342 ; INSTRUCTION SHOULD HAVE TRAPPED 

13343 065342 000167 000032 JMP es sREJOIN CODE 


A 


COKDABO KDI11-B CL 


COKDAB .P 11 


13344 
13345 


065502 


065502 


USTER 


05 - APR -84 


032737 
001003 
104003 


000167 
012604 
005726 
022704 
001401 
104003 


170203 


012737 
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000001 002776 


000014 


065326 


003102 


000022 


000002 002776 


2 
J ) 
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FLOATING POINT TESTS 


; INSTRUCTION TRAPPED 


sSEE IF EXPECTING A TRAP 
s;BRANCH IF EXPECTING A TRAP 
3;FPP ERROR 
; INSTRUCTION WASNT SUPPOSE TO TRAP 
sREJOIN CODE 
;SEE IF PC = INSTRUCTION 
sCLEAN UP STACK 


3 

;BRANCH IF GOOD COMPARE 
3;FPP ERROR 
3PC WAS INCORRECT 


sSAVE FPS 
3;SET FPP TO DOUBLE 


sPOINT TO RECEIVED DATA TABLE 
sSAVE ACO RESULT 
s;VERIFY STATUS 
;BRANCH IF GOOD 
3;FPP ERROR 
;BAD FPS 
sPOINT TO EXPECTED DATA 


;VERIFyY DATA 


;BRANCH IF GOOD 
3;FPP ERROR 


3;BAD ACO 
_  $SEE IF NEED TO CHECK FEC 
;BRANCH IF NEED TO CHECK 
;RETURN FROM TEST 
;SAVE FEC 
:GET FEC 
;VERIFY FEC 
;BRANCH IF GOOD 
3FPP ERROR 
;BAD FEC 
s;RETURN FROM TEST 


50$: BIT #1,20F LAG 
BNE 51$ 
ERROR 3 
JMP es 
51$: MOV (SP )+,R4 
TsT (SP )>+ 
CMP 1$,R4 
BEQ 2s 
ERROR +3 
2 
;COMMON CODE FOR TRAP AND NO TRAP 
2s: STFPS R3 
MOV #200 ,R2 
LOFPS Re 
MOV MRECDST,R1L 
STD Aco,C(R1) 
CMP 16(R5),R35 
BEG 3$ 
ERROR 3 
3$: MOV RS,R4 
ADD #10,R4 
4$: JSR R7,DATVFR 
TST T 
BEQ 5$ 
ERROR +3 
S$: TST QeF LAG 
BNE 6$ 
JMP 20( RS) 
6$: STST R1 
MOV 20(R5),R4 
CMP R4,R1 
BEQ 7$ 
ERROR +3 
7$: JMP 22(R5) 
Hy 
HOP 10: 
e 
; 
TEST DIvOd - 
3 
" 
MOIVD: 


i1/AC-FSRC 0 TRAPS DISABLED 
MOV #2, Q0F LAG 


3NO INTERRUPT 


SEQ 0242 


COKDABO KDJ11-B CLUSTER 


COKDAB.P11 


05 - APR - 84 


004 767 


012737 
004767 
000402 


MACY11 
16:45 


000516 
000000 


000000 
000000 


000446 


30( 1046) 


000000 


05 -APR-84 16:4 
FLOATING POINT T 


JSR 
. WORD 


. WORD 
. WORD 


. WORD 
. WORD 


. WORD 
32/FSRC=0, TRAPS 
MOV 


JSR 
. WORD 


. Wi 
34/TRUNCATE 

CLR 

JSR 

. WORD 


. WORD 
. WORD 
35/ROUND NEGATIV 

CLR 

JSR 

. WORD 
. WORD 
. WORD 


. WORD 


KK 4 


5 PAGE 244 
ESTS 


R7,0V0SUB 


0,0, 


100,0,9,0 
0,0,0,1 


40000 
140000 


4 

ENABLED 
#1,20FLAG 
R7,0VO0SUB 
402,0,0,0 
0,0,0,0 
402,0,0,0 
200 
eee 


@OF LAG 
R7,0V0SUB 
34300,0,0,1 
140300,0,0,0 
134200,0,0,1 


200 
210 


@OFLAG 
R7,DVOSUB 
34300,0,0,1 
140300,0,0,.0 
134200,0,0,0 
240 

250 

— AC, FSRC 
aeFLAG 
R7,DVOSUB 
177642,0,0,151 
166600,0,0,123 
51242,0,0,0 


200 


. WORD 200 
36/7TRUNCATE NEAGTIVE AC, # SRC 


;D0 TEST 
3ACO 


sF SRC 
sRESULT 
3; TEST FPS 
sRESULT FPS 
sFEC 
; INTERRUPT 
300 TEST 
:ACO 
3 SRC 
sRESULT 
: TEST FPS 
sRESULT FPS 
sFEC 
;NO INTERRUPT 
300 TEST 
3ACO 
3F SRC 
sRESULT 


3 TEST FPS 
sRESULT FPS. 


3;NO INTERRUPT 
300 TEST 

3ATO 

3sF SRC 

sRESULT 


3; TEST FPS 
sRESULT FPS 


3;NO INTERRUPT 
;D0 TEST 
:ACO 
3— SRC 
sRESULT 


3; TEST FPS 
sRESULT FPS 


SEG 024% 


COKDAB 


13456 
13457 
13458 


codon KDJ11 B CLUSTER MACY11 
-PLl O5-APR-84 16 


005037 
004 767 
177642 
000151 
166600 
000123 
051241 
177777 
000240 
000240 


005037 
004767 
055521 
177777 
055521 
177777 
040200 


000000 
007717 
007700 


012737 
004767 
100200 


000000 
077777 
000000 


140400 
100201 
002200 
102210 
000012 


012737 


6:45 

002776 
000224 
000000 
000000 


177777 


000212 


30( 1046) 


000000 
000000 
177777 


100333 
100333 
000000 


002776 
000000 
000000 
100200 


002776 
012346 
140000 
103645 


3 


O5-APR-84 16:45 PAGE 245 
FLOATING POINT TESTS 
CLR aeF LAG sNO INTERRUPT 
JSR R7,0VDSUB 300 TEST 
. WORD 177642,0,0,151 ;ACO 
. WORD 166600,0,0,123 ;FSRC 
.WORD = 51241,-1,-1,-1 sRESULT 
. WORD 240 ; TEST FPS 
. WORD 240 sRESULT FPS 
3 7/AC=F SRC 
CLR O4FLAG sNO INTERRUPT 
JSR R7,0VO0SUB 3:00 TEST 
-WORD 55521,47621,100333,-1 :ACO 
. WORD 55521,47621,1003335, -1 sF SRC 
. WORD 7717 3; TEST FPS 
wORD 7700 sRESULT FPS 
;8/UNDERFLOW TRAPS ENABLED, UV RESULT 
MOV #1,Q0FLAG 3; INTERRUPT 
JSR R7,0VOSUB 3:00 TEST 
. WORD 100200, 0,0,0 3ACO 
. WORD 77777,0,0,0 3sF SRC 
. WORD 140400, 100200, 100200, 100201 sRESULT 
. WORD 2200 3; TEST FPS 
. WORD —— sRESULT FPS 
WORD 3sFEC 
:9/0VERFLOW TRAPS. ENABLED 
MOV 1,a0F LAG 3; INTERRUPT 
JSR R7,0VDSUB 300 TEST 
. WORD 77000, 123465, 12346,525 3ACO 
. WORD 303,1,140000, 140001 3sF SRC 
. WORD 36650, 163002, 103645 ,64003 sRESULT 
. WORD 1700 s TEST FPS 
WORD 101702 sRESULT FPS 
. WORD 10 sFEC 
: 
HOP 11 sHOP OVER SUBROUTINE 


sOKOXOXeXaXeXeXaeXeXaXeXeXeXaXaXeXeXaXeXeXeXeXeXeKaKaxexenrex 
seXarXeXeXeXaeXaeXaeXaeXoXeKxeXaXeXeXeXeXeXeXeXeXeXeXeXaxeXeX exer 


; 
;DIVD SUBROUTINE: 


ACO 
FSRC 


FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


SEQ 0244 


COKDABO KDJ11 B 
COKDAB.P11 


13512 
13513 
13514 
13515 
13516 
13517 


B CLUSTER MACY11 30(1046) O5-APR-84 
-84 16:45 


OS - APR 


174414 
170000 


032737 
001420 
104003 


000167 


032737 
001003 
104003 


000167 
012604 
005726 
022704 


001401. 


104003 


170203 


066310 
000200 


000010 
000030 


000001 


000032 


000001 


000014 


066270 


000020 
045060 
114452 


002776 


000244 


002776 


002776 


M4 


16:45 PAGE 246 
FLOATING POINT TESTS 


8 (FEC) 


; 
g OXOXaXeXaX aX aX aXaXaXeXaXaK aK aX eX aX aXaXeXaXaXaeXeraXxaeXararer 
gOXOXOXaXOXAXaXaXAXHKXaNOXHKXAXHXOKAXOXAK OX HKHK aX EK MK OK OK SK SY 


Hy 
DVDSUB: MOV (SP)+,R5 ; RETURN ADDRESS TO USE AS POINTER 
MOV 050$ , OF PVEC sREDIRECT TRAP VECTOR 
MOV #200 ,R2 ;SET TO DOUBLE MODE FOR LOAD 
LOFPS R2 s;LOAD FPS 
MOV R5,R4 sPOINT TO FSRC DATA 
ADD #10,R4 
LDD (R5),AGO ;LOAD ACO WITH TEST DATA 
MOV 30(R5),R2 ;GET TEST FPS 
LOFPS R2 ;LOAD TEST FPS 
H 
DIVO (R4),ACO ;*#TEST INSTRUCTION 
ate CFCC ;WAIT FOR POSSIBLE FPA TRAP. 
: INSTRUCTION DIONT TRAP 
01, Q0F LAG ;VERIFY A NO TRAP CONDITION 
Sco 2s s;BRANCH IF GOOD 
ERROR +3 ;FPP ERROR 
; INSTRUCTION SHOULD HAVE TRAPPED 
JMP 2s sREJOIN CODE 
s INSTRUCTION TRAPPED 
50$: BIT #1, 90FLAG ;SEE IF EXPECTING A TRAP 
BNE 51$ ;BRANCH IF EXPECTING A TRAP 
ERROR +3 ;FPP ERROR 
; INSTRUCTION WASNT SUPPOSE TO TRAP 
JMP 2s REJOIN CODE 
51$: MOV (SP)+,R4 ;SEE IF PC = INSTRUCTION 
TST (SP)+ ;CLEAN UP STACK 
CMP #1$,R4 ; 
BEQ 23 ;BRANCH IF GOOD COMPARE 
ERROR +3 3;FPP ERROR 
3PC WAS INCORRECT 
a 
3;COMMON CODE FOR TRAP AND NO TRAP 
2s: STFPS R3 ;SAVE FPS 
MOV #200 ,R2 ;SET FPP TO DOUBLE 
LOFPS R2 
MOV #RECDST,R1 sPOINT TO RECEIVED DATA TABLE 
STD ACO,(R1) ;SAVE ACO RESULT 
CMP 32(R5),R3 ;VERIFY STATUS 
BEQ 3$ s;BRANCH IF GOOD 
ERROR -3 ;FPP ERROR 
;BAD FPS 
3$: MOV R5,R4 POINT TO EXPECTED DATA 
ADD #20,R4 
4s: JSR R7,DATVER ;VERIFY DATA 
: TST COUNT 
BEQ 5$ s;BRANCH IF GOOD 
ERROR +3 ;FPP ERROR 
;BAD ACO 
S$: TST aor LAG ;SEE IF NEED TO CHECK FEC 


SEQ 0245 


COKDABO KNJ11-8 CLUSTER 
AB.P11 05 - APR - 


COKD 


g 


eeeecees 


ESEESESS 
NOVO WNeO 


ee ee ee 
~- 
DP 


MACY11 30( 1046) 


84 16:45 


000034 
000034 


0000 36 


002776 


000000 
177777 
177777 


002776 


N3 


;BRANCH IF NEED TO CHECK 
;RETURN FROM TEST 
;SAVE FEC 
;GET FEC 
;VERIFY FEC 
;BRANCH IF GOOD 
;FPP ERROR 
;BAD FEC 
;RETURN FROM TEST 


05 -APR 16:45 PAGE 247 
FLOATING ePOINt TESTS 
BNE 6$ 
JMP 34(R5) 
6$: STSsT R1 
MOV 34(R5),R4 
CMP R4,R1 
BEG 7$ 
ERROR +3 
7$ JMP 36(R5) 
Hy 
HOP 11 
7 
a 
06s co ewe bumeedd cons a sneeewetanson 
sTEST MULF 
; 
. 
; 
; 
MMULF 


$1/ACO*F SACO -INTERRUPTS DISABLED 
CLR BOF LAG 


JSR 


g888": 


32/AC >F 20 - 


eR: 


iH 


33/AC-0 F 


34/AC#1 


;5/ TRUNCATE 
cir 


»0 - 


R7,MLF SUB 
0,0 ;ACO 
0.0 sF SRC 
0,0 

7517 

7504 
INTERRUPTS ON 
@éF LAG 
R7,MLF SUB 
200.0 ;ACO 
0,0 sF SRC 
0.0 

13 

a 

@oF LAG 
R7,MLF SUB 
100,0 3ACO 
300.0 3— SRC 
0,0 

7500 

75,04 

ROUND 

Bor LAG 

R7 FSB 
40200,0 ;ACO 
40177, 1 
40177, -1 

3 

.8) 

@oF LAG 


3NO INTERRUPT 
300 TEST 


sRESULT 
3 TEST FPS 
sRESULTANT FPS 


3NO INTERRUPT 
300 TES? 


sRPESULT 
3 TEST FPS 
sRESULTANT FPS 


7NO INTERRUPT 
300 TES! 


sRESULT 
3s TEST FPS 
sRESUL TANT FPS 


3NO INTERRUPT 
3:00 TEST 


3* SRC 

sRESULT 
3s TEST FPS 
sRESULTANT FPS 


sNO INTERRLOT 


SEQ 0246 


B44 


COKDABO KDJ11 B CLUSTER MACY11 80(1046) O5-APR-84 16:45 PAGE 248 
COKDAB P11 O05 -APR-84 16:45 FLOATING SPOINT TESTS 
13624 066610 004767 etaT JSR R7,MLF SUB 
13625 066614 040177 177777 «WORD 40177,-1 
13626 040200 ) »WORD 40200,0 ;FSRC 
13627 066624 04017 17777? «WORD 40177, 1 
13628 066630 000040 -WORD 40 
13629 066632 000040 -WORD 40 
13630 36/NORMAL IZE 
13631 066634 005037 002776 LR QOF LAG 
13632 066640 004767 000374 JSR R7,MLF SUB 
13633 066644 040100 000000 -WORD 40100,0 ;ACO 
13634 066650 040100 000000 «WORD 40100,0 ;FSRC 
13035 066654 040020 000000 -WORD 40020,0 
13636 066660 000012 . WORD 12 
13637 066662 -WORD O 
13638 3 ?/ROUND 
13639 066664 005037 002776 CLR BOFLAG 
13640 066670 004767 000344 JSR R7,MLF SUB 
13641 066674 017500 000000 . WORD 17500,0 ;ACO 
13642 066700 023652 125252 -WORD 23652,125252 
13643 066704 003177 177777 WORD 3177,-1 
13644 066710 007417 WORD 7417 
13645 066712 007400 . WORD 7400 
13646 18/AC>O>F SRC ROUND 
13647 066714 005037 00277€ CLR @OF LAG 
13648 066720 004767 000314 JSR R7,MLF SUB 
13649 066724 040342 177777 -WORD 40342, -1 
13650 066730 176543 025252 . WORD 176543025252 
13651 0667 176711 067324 . WORD 176711,67324 
13652 066740 007500 . WORD 7500 
13653 066742 007510 WORD 7510 
13654 H9/TACFSRC<O, ROUND 
13655 066744 005037 002776 CLR BOFLAG 
13656 066750 004767 000264 JSR R7,MLF SUB 
13657 066754 144600 000000 . WORD 144600,0 
13658 066760 154000 000000 WORD 154000,0 
13659 066764 060400 000000 -WORD 60400,0 
13660 066770 000017 . WORD 1? 
13661 066772 -wORD O 
13662 HLO/ACKF SRC, ROUND 
13663 066774 005037 002776 CLR @OF LAG 
13664 067000 004767 000234 JSR R7,MLF SUB 
13665 067004 06 . WORD 60000, fe) 
13666 067010 140377 177776 . WORD 140377, 177776 
13667 067014 160177 177776 . WORD L6OL77. 177776 
13668 067020 000017 . WORD 17 
13669 067022 000010 WORD 10 
13670 3117AC>O>F SRC, TRUNCATE 
13671 067024 005037 002776 CLR @OF LAG 
13672 067030 004767 000204 JSR R7,M F SUB 
13673 067034 06 000000 -WORD 60000,0 
13674 067040 140377 177776 . WORD 1403877,1°?7 7%, 
13675 067044 160177 177776 . WORD L6OL77, 1777" 
13476 067050 007547 . WORD 7547 
13677 067052 007550 . WORD 7550 
13478 /UINDE RF LOW, NO INTERRUPTS 
12679 067054 O12737 000002 0077 ?¢, MOV 62, @OFLAG 


30C TEST 
3ACO 

sRESULT 
3 TEST FPS 


sRESULTANT FPS 
sNO INTERRUPT 
300 TEST 


sRESULT 
3 TEST FPS 
sRESULTANT FPS 


sNO INTERRUPT 


300 TES’ 
sF SRC 
sRESULT 
3 TEST FPS 


sRESULTANT FPS 
sNO INTERRUPT 


3:00 TEST 
3ACO 
sF SRC 

sRESULT 
3 TEST FPS 


sRESUL TANT FPS 
3NO INTERRUPT 


300 TEST 
3ACO 
sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 
3NO INTERRUPT 
3:00 TEST 
3ACO 
sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FRS 
3NO INTERRUPT 
300 TES? 
3ACO 
3 SRC 
sRESUAT 
s TEST FPS 


sRESUAAT FPS 


sNO INTERRUPT 


SEQ 0247 


C4 


CORDABO KDILL B CLUSTER ee 8001046) O05 APR 84 16:45 PAGE 249 


COKDAB P11 OS APR 84 16:4 FLOATING POINT TESTS SEQ 0248 
18e80 067062 004767 O00152 JSR R7,MLF SUB 300 TEST 

13681 067066 000200 000001 -WORD 200,1 sACO 

13682 067072 000200 000001 -WORD 200,1 sF SRC 

13683 067076 040200 2 -WORD 40200, sRESULT 

13684 067102 042117 -WORD 42117 3; TEST FPS 

13685 067104 142100 . WORD 142100 sRESULT FPS 

13086 067106 000012 .W le sFEC 

13687 3135/0VERFLOW, TRAP 

13688 067110 012737 000001 002776 MOV @1,Q0F LAG s INTERRUPT 

13689 067116 004767 000116 JSR R7,MLF SUB 300 TEST 

13690 067122 177777 77PT? . WORD 177777,-1 3ACO 

13091 067126 040300 000000 «WORD 40300,0 sF SRC 

13692 0671382 100077 177777 . WORD 100077, -1 sRESULT 

13693 067136 001117 . WORD 1117 s TEST FPS 

13694 067140 101116 . WORD 101116 sRESULT FPS 

13095 067142 000010 . WORD 10 sFEC 

13696 314/0VERFLOW NO TRAP 

13697 067144 012737 000002 002776 MOV 02, 80F LAG 3NO INTERRUPT 

13698 067152 004767 000062 JSR R7,MLF SUB 300 TEST 

13699 067156 077700 000000 . WORD 77700,0 3ACO 

13700 067162 077700 000000 . WORD 77700,0 sF SRC 

13701 067166 000000 000000 -WORD 0,0 sRESULT 

13702 067172 O40117 -WORD 40117 3; TEST FPS 

13703 067174 040106 -WORD 40106 sRESULT FPS 

13704 067176 000010 . WORD 10 sFEC 

13705 3 1S/UNDEFINED VARIABLE IN FSRC, TRAP ENABLED 

13706 067200 012737 000001 002776 MOV @1,Q0F LAG s INTERRUPT 

13707 067206 004767 000026 JSR R7,MLF SUB 300 TEST 

13708 067212 123465 000000 . WORD 123465,0 3ACO 

13709 067216 100022 000000 . WORD 100022,0 sF SRC 

13710 067222 123465 000000 . WORD 123465,0 sRESULT 

13711 067226 004000 -WORD 4000 3s TEST FPS 

13712 067230 104000 . WORD 104900 sRESULT FPS 

13713 067232 000014 . WORD 14 sFEC 

13714 : 

13715 

13716 067234 000167 000212 JMP HOP 12 

13717 gOXOXOKOXOXOXOXOXOXOKXOKX KOK EKOKOXOKOXSKONSKSXOKSKaXeXexexex 
4H g OX eX eX eK eXeXeXeKeXeKeXeXeXeXeXeKXeXeXeXeXeXeXeXeXeXeXeXeXex 

i 

13720 3 ACO 

13721 3 FSRC 

1372e : FPS BEFORE EXECUTION 

13723 : FPS AFTER EXECUTION 

13724 ; (FEC) 

13725 3 

13726 gOXOX OK OK OK OXOKOKOKOXOXOKXOXOKXOKXOKOKXOKXOKOXOXOXOKNOKSKOXSKONEN 
rayee gOKOKOKOKXOXOKXOXOKOKOXOXOKOXOKOKSKXOXOKOXOKOXOXOXOKOMOKSKONON 

; 

13729 067240 012605 MLF SUB: MOV (SP)-,R5 s RETURN ADDRESS 10 USE AS POINTER 
13730 067242 012737 067316 000244 MOV 050% , aoF PVEC sREDIRECT TRAP VECTOR 
13731 067250 012702 000200 MOV @200 ,R2 sSET TO DOUBLE MODE FOR LOAD 
13732 067254 170102 LDFPS = §=R2 sLOAD FPS 

13733 067256 172415 LOO (R5),ACO sLOAD ACO WITH TEST DATA 
13734 067260 010504 MOV R5,R4 sPOINT TO FSRC DATA 


15735 067262 062704 000004 ADD 04,R4 


COKDABO KDNI11 B CLUSTER MACYLL 380( 1046) 
COKDAB.P11 05 -APR-84 16:45 


016502 000014 
170102 


4 171014 
76 170001 


OO 032737 000001 00277 
06 001420 
10 104003 


000167 000032 


032737 
001003 
104003 


000001 002776 


000014 


067276 


000200 
003102 
000016 


000010 
044034 
113444 


002776 
000020 


170301 
016504 
020401 
001401 
104903 


000165 


000020 


000022 


[44 


O5-APR 84 16:45 PAGE 250 
FLOATING POINT TESTS 
MOV 14(R5),R2 sGET TEST FPS 
LOFPS Ro 3LOAD TEST FPS 
3 
MULF (R4),ACO s¢TEST INSTRUCTION 
1$; SE TF sWAIT FOR POSSIBLE FPA TRaP, 
3 
s INSTRUCTION DIONT TRAP 
BI 1, @0FLAG sVERIFyY A NO TRAP CONDITION 
BEQ 2s sBRANCH IF GOOD 
ERROR 3 ;—PP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
JMP 2s sREJOIN CODE 
3 
s INSTRUCTION TRAPPED 
508: BIT #1, 90FLAG sSEE IF EXPECTING A TRAP 
BNE 51$ ;BRANCH IF EXPECTING A TRAP 
FRROR 3 3FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
JMP 2s sREJOIN CODE 
518: MOV (SP)+,R4 ;SEE IF PC = INSTRUCTION 
TsT CSP )-> sCLEAN UP STACK 
CMP #1$,R4 3 
BEQ es sBRANCH IF GOOD COMPARE 
ERROR +3 3FPP ERROR 
sPC WAS INCORRECT 
3 
;COMMON CODE - UR TRAP AND NO TRAP 
2s: STFPS R3 sSAVE FPS 
MO #200 ,R2 3SET FPP TO DOUBLE 
LOFPS Re 
MOV ORECOST,R1 sPOINT TO RECEIVED DATA TABLE 
sid ACO,C(R1) sSAVE ACO RESULT 
CMP 16(R5),R3 sVERIFy STATUS 
BEQ 3$ ;BRANCH IF GOOD 
ERROR 3 3F PP ERROR 
sBAD FPS 
3$; MOV R5S,R4 sPOINT TO EXPECTED Data 
ADD 10,R4 
43%: JSR R7,DATVFR sVERIfF y DATA 
TST COUNT 
BEQ 5$ sBRANCH IF GOOD 
ERROR 3 3F PP ERROR 
;BAD ACO 
5%: TST QOF LAG ;SEE IF NEED TO CHECK FEC 
BNE 6$ sBRANCH IF NEED TO CHECK 
JMP 20(R5) sRETURN FROM TEST 
sVERIFY ERROR STATUS 
6$: sTst R1 sSAVE FEC 
MOV 20°C RS), R4 sGET FEC 
cmMP R4,R1 sVERIFY FEC 
BEQ 7$ sBRANCH IF GOOD 
ERROR 3 36 PP ERROR 
3BAD FEC 
7$: JMP 22cR5) sRETURN FROM TEST 
HOP 12; 


SEQ 0249 


E 44 


COKDABO KDILL 8 CLUSTER MACY11 3001046) O5 APR -84 16:45 PAGE 251 
COKDAB.P 11 O05 -APR 84 16:45 FLOATING POINT TESTS SEQ 02859 
1279) 3 

138798 8: . 

13799 sTEST MULD 

13795 : 

13796 3 

13797 3 

13798 : 

13799 067452 MMULD : 

13800 

13801 3 

13802 31/AC=0 

13803 067452 005037 002776 CLR @oF LAG 3NO INTERRUPT 
13804 067456 004767 000554 JSR R7,MLDSUB 300 TEST 
13805 067462 000100 000000 000000 WORD 100,0,0,0 3ACO 

13806 067470 

13807 067472 000411 177777 000000 . WORD 411, -1,0,1 3sF SRC 

13808 067500 000001 

13809 067502 000000 000000 000000 .» WORD 0,0,0,0 sRESULT 

13819 067510 

13811 067512 000200 . WORD 200 s TEST FPS 
13812 067514 000204 . WORD 204 sRESULTANT FPS 
13813 s2/FSRC=0 

13814 067516 005037 002776 CLR QeF LAG 3NO INTERRUPT 
13815 067522 004767 000510 JSR R7,MLDSUB 300 TE>? 
13816 067526 077777 000000 . WORD 77777,0,0,0 3ACO 

13817 067534 000000 

13818 067536 000000 000000 000000 . WORD 0,0,0,0 3=SRC 

13819 067544 000000 

13820 067546 000000 000000 000000 . WORD 0,0,0,0 sRESULT 

13821 067554 000000 

13822 067556 007700 . WORD 7700 3 TEST FPS 
13823 067560 007704 WORD 7704 sRESUL TANT FPS 
13824 33/AC=1 

13825 067562 005037 002776 CLR @eF LAG sNO INTERRUPT 
13826 067566 004767 000444 JSR R7,.ML0SUB 300 TES? 
13827 067572 040200 000000 00000 . WORD 40200,0,0,0 3ACO 

13828 067600 

13829 067602 000277 177777 177777 . WORD 277 «¢-Le-30-3 sF SRC 

13830 067610 177777 

13831 067612 000277 177777 #+177777 . WORD i a) a Pe sRESULT 
13832 067620 177777 

13833 067622 007717 . WORD 7717 3 TEST FPS 
13834 067624 007700 . WORD 7700 sRESULTANT FPS 
13835 347AC>FSRC>0O, TRUNCATE 

13836 067626 005037 002776 CLR aeF LAG 3sNO INTERRUPT 
13837 067632 004767 000400 JSR R7,MLOSUB 300 TEST 
13838 067636 065500 000000 000000 .- WORD ©5500,0,0,1 3ACO 

13839 067644 000001 

13840 067646 037577 177777 #+177777 . WORD S7S77.,-4.-1.-2 sF SRC 

13841 067654 177776 

13842 067656 065077 177777 #+%177777 .» WORD 65077,-1,-1.-1 sRESULT 
13843 067664 177777 

132844 067666 007717 WORD 7717 3 TEST FPS 
13845 067670 007700 WORD 7700 sRESULTANT FPS 
13846 35/AC<FSRC<O 

13847 067672 005037 002776 CLR QF LAG 3NO INTERRUPT 
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13848 067676 004767 


13880 070046 012737 
13881 070054 004767 
13882 070060 100277 
13883 070066 177777 
13884 070070 100300 
13885 070076 000001 
13886 070100 040417 


000000 
138688 070110 002217 
13889 070112 102200 
13890 070114 000012 


13892 070116 005037 
13893 070122 004767 
13894 070126 177777 
13895 070134 177777 
13896 070136 040200 
13897 070144 177777 
13898 070146 000000 
13899 070154 000000 
13900 070156 006740 
13901 070160 006746 


13903 070162 012737 


MACY1L1 30( 1046) 
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000334 
177777) «177777 


000000 000000 
000000 000000 


002776 
000270 
000000 000000 
125252 125252 


177777) «=177777 


000001 000002 


000001 002776 
000001 000002 
000001 000001 
040001 077403 


002776 
000110 
177777 =177777 
177777) «6177777 


000000 000000 


000001 002776 


F 4 
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FLOATING POINT TESTS 


JSR R7,MLOSUB 300 TEST 

. WORD 137577,-1,-1.-2 ;ACO 

-WORD 65000,0,0,0 sRESULT 

. WORD 7717 3; TEST FPS 

. WORD 7700 sRESULTANT FPS 
36/7AC>FSRC>O0 

CLR BOF LAG 3NO INTERRUPT 

JSR R7,MLOSUB 300 TEST 

. WORD 17500,0,0,0 ACO 

. WORD 123652, 125252, 125252, 125252 sF SRC 

. WORD 105177,-3.-%.-1 sRESULT 

-WORD 200 ; TEST FPS 

* 0) 210 sRESULTANT FPS 
37/UNDERFLOW, TRAPS DISABLED 

CLR @eFLAG 3NO INTERRUPT 

JSR R7,MLOSUB 300 TEST 

-WORD 300,0,0,252 3ACO 

-WORD 0,0,0,0 sRESULT 

-WORD 5740 ; TEST FPS 

-WORD 5744 sRESULT FPS 
38/UNDERFLOW, TRAP ENABLED 

MOV 1,80FLAG ; INTERRUPT 

JSR R7,MLOSUB 300 TEST 

-WORD 100277,1,2,-1 ACO 

-WORD 100300,1,1.1 sF SRC 

. WORD 40417,40001, 77403,0 sRESULT 

. WORD 2217 3; TEST FPS 

. WORD 102200 sRESULT FPS 

. WORD l2 sFEC 
;9/0VERFLOW, TRAPS DISABLED 

CLR @aeF LAG sNO INTERRUPT 

JSR R7,MLOSUB ;D0 TEST 

. WORD -l, Ls - bs -3 3ACco 

~ WORD 40200, -1, «i, 1 sF SRC 

. WORD 0,0,0,0 sRESULT 

. WORD 6740 3 TEST FPS 

. WORD 6746 sRESULT FPS 
3 1LO/OVERFLOW, TRAPS ENABLED 

MOV #1,@0F LAG s INTERRUPT 


SEQ 0251 
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070170 
070174 


-O70232 


070236 
070240 
070246 
070252 
070254 
070256 
070260 
070264 
070270 


070272 
070274 


070276 


070310 


070314 
070322 
070324 


070326 
070332 
070334 
070336 
070342 
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004 767 
157700 
025252 
167700 


000000 
007420 
117777 
001240 
101242 
000010 


000167 


012605 
012737 
012702 
170102 
172415 
010501 
062701 
016502 
170102 


171011 
170011 


032737 
001420 
104003 


000167 


032737 
001003 
104003 


000167 
012604 
005726 
022704 
001401 


MACY11L 30( 1046) 
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000042 
025252 
000000 
017777 


000212 


070314 
000200 


000010 
000030 
000001 


000032 


000001 


000014 


070274 


025252 
000000 
117777 


000244 


002776 


002776 


G4 
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FLOATING POINT TESTS 
JSR R7,MLOSUB 300 TEST 
. WORD 157700, 25252,25252, 25252 3ACO 
-WORD 167700,0,0,0 3F SRC 
. WORD 7420,017777,117777,117777 sRESULT 
. WORD 1240 3s TEST FPS 
«WORD 101242 sRESULT FPS 
. WORD 10 sFEC 
3 
JMP HOP 13 


a eXeXeXeaXeXaXeXaxexeXaKkaXaXxeXexaXaXaexexXeXeXaeXarexeXeXxakexex 
SOXOKOX XOX aXeXeXeXeXaXeXaeXeXeXeXaXaXxaXeXaxaraexeXerexvaxaexex 


Aco 
FSRC 


FPS AFTER EXECUTION 


: 
; 
; FPS BEFORE EXECUTION 
; 
; 


(FEC) 


H 
peXeXeXeXeXeXeXaXaXeXaXaXexaXeXexaXaxeXeXaXaeXaxeXeXeXaXerXeor 
poXeXaXeXeXaXeXaXeXaXeXexeXaXaXeXxeXeXaxeXaXaxXeXaeXxaXeXexexar 


é 
MLOSUB: MOV (SP )+,R5S : RETURN ADDRESS TO USE AS POINTER 
Vv 950$ ,@oFPVEC sREDIRECT TRAP VECTOR 
MOV #200 ,R2 sSET TO DOUBLE MODE FOR LOAD 
LOFPS Re ;LOAD FPS 
L00 CRS), ACO sLOAD ACO WITH TEST DATA 
MOV RS,R1 sPOINT TO FSRC DATA 
ADD #10,R1 
MOV 30(R5),R2 ;GET TEST FPS 
LOFPS Re sLOAD TEST FPS 
é 
MULD CR1),ACO 3¢TEST INSTRUCTION 
1$: SETD sWAIT FOR POSSIBLE FPA TRAP. 
; 
s INSTRUCTION DIONT TRAP 
BIT #1,Q0F LAG sVERIFy A NO TRAP CONDITION 
BEQ es sBRANCH IF GOOD 
ERROR +3 3FPP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
JMP 2s sREJOIN CODE 
é 
s INSTRUCTION TRAPPED 
50$: BIT #1,Q0F LAG 3SEE IF EXPECTING A TRAP 
BNE 51$ sBRANCH IF EXPECTING A TRAP 
ERROR 3 3FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
JMP es sREJOIN CODE 
518: MOV (SP )+,R4 3SEE IF PC = INSTRUCTION 
TST (SP )>+ ;CLEAN UP STACK 
CMP #1$,R4 3 
BEQ es sBRANCh TF GOOD COMPARE 


SEQ 0252 


H4 
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COKDAP P11 05 -APR-84 16:45 FLOATING POINT TESTS SEQ 0253 
13960 070344 104003 ERROR 3 3;FPP ERROR 
{eet 3PC WAS INCORRECT 
13962 : 
13963 ;COMMON ©)JDE FOR TRAP AND NO TRAP 
13964 070346 170203 2s: STFPS R3 sSAVE FPS 
13965 070350 012702 000200 Vv #200 ,R2 3SET FPP TO DOUBLE 
13966 070354 170102 LDOFPS Re 
13967 070356 012701 003102 MOV #RECDST,R1 sPOINT TO RECEIVED DATA TABLE 
13968 070362 174011 STD ACO,(R1) sSAVE ACO RESULT 
13969 070364 026503 000032 CMP 32(R5),R3 ;VERIFY STATUS 
13970 070370 001401 BEQ 3$ ;BRANCH IF GOOD 
13971 070372 104003 ERROR +3 3—PP ERROR 
13972 3BAD FPS 
13973 070374 010504 3$; MOV RS,R4 sPOINT TO EXPECTED DATA 
1397 070376 062704 000020 ADD #20,R4 
1397 070402 004767 043054 4$; JSR R7,DATVER ;VERIFY DATA 
1397 070406 005767 112446 TsTt COUNT 
13977 070412 001401 BEG 5$ ;BRANCH IF GOOD 
13978 070414 104003 ERROR +3 3FPP ERROR 
1397 :BAD ACO 
13980 070416 005737 002776 S$: TST OF LAG ;SEE IF NEED TO CHECK FEC 
13981 070422 001002 BNE 6$ sBRANCH IF NEED TO CHECK 
13982 070424 000165 000034 JMP 34(R5S) sRETURN FROM TEST 
13983 ;VERIFY ERROR STATUS 
13984 070430 170301 6$: STST R1 sSAVE FEC 
13985 670432 016504 000034 MOV 34(R5),R4 ;GET FEC 
13986 070436 020401 CMP R4,R1 :VERIFY FEC 
13987 070440 001401 BEQ 7$ ;BRANCH IF GOOD 
13988 070442 104003 ERROR +3 3FPP ERROR 
13989 ;BAD FEC 
13990 070444 000165 000036 7$;: JMP 36(R5) ;RETURN FROM TEST 
13991 070450 HOP 13: 
13992 3 
13993 3 
13994 bade PCC CUS Ce SKwS UMW hw Cem ews Ke 
13995 3 TEST MODF 
13996 : 
13997 ; 
13998 3 
13999 3 
14000 070450 MMOODF : 
14001 
14002 
14003 317AC=0 FSRC=0 
14004 070450 005037 002776 CLR aver LAG 3NO INTERRUPT 
14005 070454 004767 000554 JSR R7,MDF SUB 300 TEST 
14006 070460 000100 WORD 100,0 3ACO 
14007 070464 012346 177777 . WORD 12346, -1 sF SRC 
14008 070470 000000 000000 - WORD 0,0 sFRACTIONAL RESULT 
14009 070474 000000 000000 . WORD 0,0 s INTEGER RESULT 
14010 070500 000013 WORD 13 3 TEST FPS 
14011 070502 18) 4 sRESULTANT FPS 
14012 32/FSRC=0 
14013 070504 005037 002776 CLR QF LAG :NO INTERRUPT 
14014 070510 004767 000520 JSR R7,MDF SUB 300 TEST 
14015 070514 012356 177777 . WORD 12356, -1 3ACO 
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14016 
14017 
14018 
14019 


070520 
070524 
070530 


070570 
070572 


070574 
070600 


070714 
070716 


070720 
070724 
070730 
070734 
070740 
070744 
070750 
070752 


070754 
070760 
070764 
070770 
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000000 000000 


000000 000000 
046377 177777 


005037 002776 
004767 000374 
077652 125252 

000000 


000000 000000 
077777 177777 


14 
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FLOATING POINT TESTS 


33/AC-0 


CLR 


JSR 


° D 
38/AC<O>F SRC, 

CLR 

JSR 

. WORD 

. wORD 


0,0 sF SRC 


2uco 
oo 


Ule «© wee w 
. 
— 


R7,MOF SUB 
46252, 125252 


9 wees sF SRC 


Oo, 
46377, -1 
13 
4 


@OFLAG 
R7 MDF SUB 
776S2,125252 


40300,0 ;FSRC 


0,0 
77777, -1 
0 


4 
INTEGERS 


60600 ,0 
147400,25700 


0,0 

170000, 25700 

7400 

7404 
FRACTIONAL 


100227, -1 
44025, 25252 
104061,21251 
* 


10 

TRUNCATE 
@oF LAG 
R7, MDF SUB 
46252 ,125252 
40300,0 


sFRACTIONAL RESULT 
s INTEGER RESULT 
3 TEST FPS 


sRESULTANT FPS 


sNO INTERRUPT 
300 TEST 
3ACO 


3 SRC 

sFRACTIONAL RESULT 
s INTEGER RESULT 

3 TEST FPS 

sRESULT FPS 


;NO INTERRUPT 
300 TES!’ 
3ACO 


sFRACTIONAL RESULT 

s INTEGER RESUL’ 
; TEST FPS 
sRESUL TANT FPS 


3;NO INTERRUPT 
300 TEST 
:ACO 


sFRACTIONAL RESULT 

s INTEGER RESULT 
3; TEST FPS 
sRESUL TANT FPS 


sNO INTERRUPT 
300 TEST 
3ACO 


3F SRC 
sFRACTIONAL RESULT 

s INTEGER RESULT 
3; TEST FPS 
sRESULT FPS 


3;NO INTERRUPT 
300 TEST 
3ACO 
3sF SRC 
sFRACTIONAL RESULT 
s INTEGER RESULT 
3 TEST FPS 
sRESULT FPS 


3NO INTERRUPT 


3F SRC 


SEQ 0254 
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070774 
071000 
071004 
071006 


071010 
071014 
071020 
071024 
071030 
071034 
071040 
071042 


071044 
071050 
071054 
071060 
071064 
071070 
071074 
071076 


071100 
071104 
071110 
071114 
071120 
071124 
071130 
071132 


071134 
071140 
071144 
071150 
071154 
071160 
071164 
071166 


071170 
071176 
071202 
071206 
071212 
071216 
071222 
071224 
071226 


071230 
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005037 
004767 
040225 
066652 


000000 
066707 
007027 
007004 


012737 
004767 
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000000 
177777 


002776 
000214 
125252 
000000 


000000 
177777 


002776 
000160 
177777 


000000 
177770 
000000 


000000 
025160 


000001 
000032 
000000 
000000 


002776 


J4 
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FLOATING POINT TESTS 


-WORD 0,0 

-WORD 46577,-1 

«WORD 53 

° 44 
39/ROUND INTEGER 

CLR QOF LAG 


JSR R7, MOF SUB 
«WORD 46252,125252 
«WORD 40300,0 


~ WORD 0,0 
-WORD 46377,-1 
-WORD 13 
-WORD 4 

3 LO/TRUNCATE FRACTION 
CLR @oF LAG 


“wORD  40200,0 
"WORD 40177.177770 
"WORD 40740,0 


-WORD O 

-WORD O 
311/ROUND INTEGER 

CLR aoF LAG 

JSR R7, MOF SUB 

. WORD 0 

-WORD 0,0 

-WORD 0,0 

-WORD 0,0 

«WORD O 

-WORD 4 
312/ROUND FRACTION 

CLR @eF LAG 

JSR R7,MOF SUB 


-WORD 40225,125252 
-WORD 66652,52525 


-WORD 0,0 
-WORD 66707,25160 
. WORD 7027 
. WORD 7004 
3 OVERFLOW 
Vv #1,Q0FLAG 
JSR R7,MDF SUB 


WORD 0,0 
WORD 33600,0 
. WORD 1000 
. WORD 101006 
. WORD 10 

é 
JMP HOP 14 


sFRACTIONAL RESULT 

s INTEGER RESULT 
; TEST FPS 
sRESULT FPS 


sNO INTERRUPT 
300 TEST 
3ACO 


3F SRC 
sFRACTIONAL RESULT 
s INTEGER RESULT 
3 TEST FPS 
sRESULT FPS 


sNO INTERRUPT 


sFRACTIONAL RESULT 
s INTEGER RESULT 
3 TEST FPS 
sRESULT FPS 


3;NO INTERRUPT 
300 TEST 
3ACO 


3— SRC 

sFRACTIONAL RESULT 
; INTEGER RESULT 

3 TEST FPS 

sRESULT FPS 


3sNO INTERRUPT 

3:00 TEST 

;ACO 

sF SRC 
sFRACTIONAL RESULT 

s INTEGER RESUL? 


3 TEST FPS 
sRESULT FPS 
3: INTERRUPT 
300 TEST 
3;ACO 
3F SRC 


sFRACTIONAL RESULT 
s INTEGER RESULT 

3; TEST FPS 

sRESULT FPS 

3sFEC 


BOKOKOKOKOKXOKOXOKOKOKeKeKeXeKeKeKoKeXeXeXeKeXexkeXaxexakeaxex 
SOL OKOKOLOKOKOXOKOKOKOKeKeKeKeKeXeKXeXKeKeXeXeXeXeKXeXeXeXeXen 


SEQ 0255 


COKDABO KDILL B CLUSTER MACY11 30( 1046) 
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14108 
14109 
14140 
14131 
14132 
14138 
14134 
14135 
14136 
14137 
14138 
14139 
14140 
14141 
1414) 
14143 
14144 
14145 
14146 
14147 
14148 
14149 
14150 
14151 
14152 
14153 
14154 
14155 
14150 
14157 
14158 
14159 


071270 
071274 


071276 
071300 


071302 
071310 
071312 


071314 


071320 
071326 
071330 


071332 
071336 
071340 
071342 
071346 
071350 


071352 
071354 
071360 
071362 


071366 
071370 
071374 
071376 
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012605 
012737 
012702 
170102 
172415 
012701 
172511 
010501 
062701 
016502 
170102 


171411 
170001 


032737 
001420 
104003 


000167 


032737 
001003 
104003 


000167 
012604 
005726 
022704 
001401 
104003 


170203 
012702 
170102 
012701 


174011 
026505 
001401 
104003 


071320 
000200 


071500 


000004 
000020 


000001 


000032 


000001 


000014 


071300 


000200 
003102 


000022 


000244 


002776 


002776 
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FLOATING POINT TESTS 


ACO 
FSRC 


FRACTIONAL RESULT 


INTEGER RESULT 


FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


(FEC) 


3 oXaXaXaeXaeXaXeXaXaXaXaXaXaXavaXaXaxaxXaXxaXaXaXxaXaXaxaXaXeXex 
OX OXeXeXaXaeXeXeXaXaXaXeXaX eXeXaXeXaXeXaXeXaXaXaXaXaXaXxeXxaxr 


MOF SUB: MOV (SP)+,RS 
MOV o50$ , @OF PVEC 
MOV #200 ,R2 
LOFPS Re 
LOD CRS), ACO 
MOV @MODGAR , 
LOD (R1),AC1 
MOV RS,R1 
ADD #4,R1 
MOV 20(R5), Re 
LOFPS R2 

é 
MOOF (R1),ACO 

ae SETF 

; INSTRUCTION OIONT TRAP 
BIT $1,@0FLAG 
BEQ es 
ERROR +3 
JMP es 

p INSTRUCTION TRAPPED 

50$: BI #1,30FLAG 
BNE S1$ 
ERROR +3 
JMP 2s 

S18: MOV (SP)+,R4 
TST (SP )- 
CMP #1$,R4 
BEQ es 
ERROR +3 


3; RETURN ADDRESS TO USE AS POINTER 
sREDIRECT TRAP VECTOR 

:SET TO DOUBLE MODE FOR LOAD 

sLOAD FPS 

3;LOAD ACO WITH TEST DATA 

;LOAD KNOWN INTO AC1 


3 
sPOINT TO FSRC DATA 


sGET TEST FPS 
sLOAD TEST FPS 


s#TEST INSTRUCTION 
sWAIT FOR POSSIBLE FPA TRAP. 


sVERIFY A NO TRAP CONDITION 
;BRANCH IF GOOD 
;FPP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
sREJOIN CODE 


sSEE IF EXPECTING A TRAP 
;BRANCH IF EXPECTING A TRAP 
3FPP ERROR 
; INSTRUCTION WASNT SUPPOSE TO TRAP 
sREJOIN CODE 
sSEE IF PC = INSTRUCTION 
sCLEAN UP STACK 


3 

;BRANCH IF GOOD COMPARE 
3FPP ERROR 
3PC WAS INCORRECT 


é 
;COMMON CODE FOR TRAP AND NO TRAP 


2s: STFPS R35 
MOV #200 ,R2 
titi R2 
@RECDOST,R1 
3 SAVE FRACTIONAL RESULT 
STO ACO,(R1) 
CMP 22(R5),R3 
BEQ 3$ 
ERROR +3 


sSAVE FPS 
;SET FPP TO DOUBLE 


sPOINT TO RECEIVED DATA TABLE 


;SAVE ACO RESULT 

sVERIFY STATUS 

sBRANCH IF GOOD 
;FPP ERROR 
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14184 
14185 
14186 
14187 
14188 
14189 
14190 
14191 
14192 
14193 
14194 
14195 
14190 
14197 


071400 
071402 
071406 
071412 
071416 
071420 


C71422 
071424 
071426 
071432 
071436 
071442 
071444 


071446 
071452 
071454 
071460 
071462 
071466 
071470 
071472 


071474 


071500 
071506 
071510 


071510 


071510 
071514 
071520 
071526 
071530 
071536 
071540 
071546 
071550 
071556 
071560 
071562 


010504 
062704 
004767 
005 767 
001401 
104003 


174111 


177777 
177777 
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000010 
042032 
111442 


000014 
042006 
111416 


002776 
000024 
000024 


000026 
177777 


002776 
001164 
177777 
000000 
000000 


000000 


177777 


177777 
000000 
000000 
000000 
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38: MOV R5,R4 
ADD #10,R4 
4$; JSR R7,DATVFR 
TST COUNT 
BEQ 5$ 
ERROR +3 
;SAVE INTEGER RESULT 
S$: sto AC1,(R1) 
MOV RS,R4 
ADD #14 ,R4 
JSR R7,DATVFR 
TST COUNT 
BEQ 6$ 
ERROR +3 
6$: TST aeF LAG 
BNE 7$ 
JMP 24(R5) 
7$; STST R1 
MOV 24(R5),R4 
CMP R4,R1 
BEQ 8$ 
ERROR +3 
8$: JMP 26(R5) 
: 
MODGAR: .WORD ~Be-ba <de~t 
HOP 14; 
3 
t 
+H -—-—-—-—-- = = ee wee ee ere rr rr rr rr rr rr rr rm rr er 
;TEST MODD 
A 
3 
3 
3 
MMODD : 
3 
31/AC>FSRC=0 
CLR aoF LAG 
JSR R?7,MDDSUB 
. WORD 12345,-1,-1.-1 


-WORD 100,0,0,0 
-WORD 0,0,0,0 
-WORD 0,0,0,0 


-WORD 200 
-WORD 204 


3BAD FPS 
sPOINT TO EXPECTED DATA 


;VERIFY DATA 


;BRANCH IF GOOD 
3FPP ERROR 
3BAD ACO 


sSAVE AC1 RESULT 
sPOINT TO EXPECTED 


;VERIFY DATA 


3 
;BRANCH IF GOOD 
;FPP ERROR 
;BAD AC1 
3;SEE IF NEED TO CHECK FEC 
;BRANCH IF NEED TO CHECK 
;RETURN FROM TEST 
;SAVE FEC 
;GET FEC 
;VERIFY FEC 
;BRANCH IF GOOD 
;FPP ERROR 
;BAD FEC 
sRETURN FROM TEST 


sKNOWN DATA FOR AC1 


3NO INTERRUPT 

;00 TEST 
3ACO 
3sF SRC 
sFRACTIONAL RESULT 
; INTEGER RESULT 


s TEST FPS 
sRESULTANT FPS 


SEQ 0257 


COKDABO KDJ11 B CLUSTER 
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14240 

14241 071564 005037 
14242 071570 004767 
14243 071574 000000 
14244 071602 000000 
14245 071604 001234 
14246 071612 000000 
14247 071614 000000 
14248 071622 000000 
14249 071624 000000 
14250 071632 000000 
14251 071634 007717 
14252 071636 007704 


14254 071640 005037 
14255 071644 004767 
14256 071650 056252 
14257 071656 125250 
14258 071660 040300 
14259 071666 000000 
14260 071670 000000 
14261 071676 000000 
14262 071700 056377 
14263 071706 177774 
14264 071710 000213 
14265 071712 000204 


14267 071714 005037 
14268 071720 004767 
14269 071724 140240 
14270 071732 000000 
14271 071734 063714 
14272 071742 167737 
14273 071744 000000 
‘14274 071752 000000 
14275 071754 163777 
14276 071762 125726 
14277 071764 000210 
14278 071766 000204 


14280 071770 005037 
14281 071774 004767 


MACYL1 
16:45 


002776 
001110 
000000 
177777 
000000 
000000 


002776 
001034 
125252 
000000 
000000 


177777 


002776 
000760 
000000 
146314 
000000 


177777 


002776 
000630 
125252 


M4 


Q0F LAG sNO INTERRUPT 
R7,MO0SUB 300 TEST 
0,0,0,9 ;ACO 

1234,-1,0,0 3F SRC 

0,0,0,0 sFRACTIONAL RESULT 
0,0,0,0 ; INTEGER RESULT 

7717 ; TEST FPS 

7704 sRESULTANT FPS 

QF LAG sNO INTERRUPT 
R7,MDDSUB ;00 TEST 
56252, 125252, 125252, 125250 3ACO 
40300,0,0,0 sF SRC 

0,0,0,0 sFRACTIONAL RESULT 
56377, oh, -l, -4 ; INTEGER RESULT 
213 ; TEST FPS 

204 sRESULTANT FPS 

aeF LAG sNO INTERRUPT 
R7,MDDSUB ;00 TEST 
140240,0,0,0 3ACO 
63714,146314,133572,167737 sF SRC 
0,0,0,0 sFRACTIONAL RESULT 
163777, -1,162531,125726 ; INTEGER RESULT 
210 » VEST FPS 

204 sRESULTANT FPS 

aeF LAG sNO INTERRUPT 
R7,MDDSUB :00 TEST 
56200,0,0,1 3ACO 

40340,0,0,0 sF SRC 

0,0,0,0 sFRACTIONAL RESULT 
56340,0,0,1 ; INTEGER RESULT 
213 3 TEST FPS 

204 sRESULTANT FPS 

avr LAG sNO INTERRUPT 
R7,MODSUB ;D0 TEST 


30( 1046) 0O5-APR-84 16:45 PAGE 259 
FLOATING POINT TESTS 
32/AC =O<F SRC 

CLR 
JSR 
000000 ‘ 
000000 . WORD 
000000 .WORD 
000000 . WORD 
. WORD 
. WORD 
33/AC>FSRC>O 
CLR 
JSR 
125252 . WORD 
000000 . WORD 
000000 . WORD 
177777 .WORD 
. WORD 
. WORD 
34/AC<O>F SRC 
CLR 
JSR 
000000 . WORD 
133572 . WORD 
000000 . WORD 
162531 . WORD 
. WORD 
. WORD 
35/AC>FSRC>0 
CLR 
JSR 

000000 . WORD 

000000 . WORD 

000000 . WORD 

000000 WORD 
. WORD 
. WORD 
367 TRUNCATE 
CLR 
JSR 
125252 . WORD 


56252, 125252, 125252, 125252 3ACO 


SEQ 0258 


COKDABO KDJ11-8 CLUSTER MACY11 
COKDAB.P11 


14296 
14297 
14298 


072114 
072116 


072120 
072124 
072130 
072136 
072140 
072146 
072150 
072156 
072160 
072166 
072170 
072172 


072174 
072200 


05 - APR -84 


125252 
040300 


012737 
004767 
177777 
177777 
040400 
000000 
000000 


16:45 


000000 
000000 
177777 


002776 
000554 
125252 
000000 


177777 


177777 
000000 


30( 1046) 


000000 
000000 
177777 


125252 
000000 
177777 
000000 


052525 
000000 
177777 
000000 


002776 
177777 
000000 
000000 


N4 


OS-APR-84 16:45 PAGE 260 
FLOATING POINT TESTS SEQ 0259 
-WORD 0O,0,0,9 sFRACTIONAL RESULT 
-WORD 56377,-1,-1,-1 s INTEGER RESULT 
. WORD = 3; TEST FPS 
-WORD 244 sRESULT FPS 
3 7/7TRUNCATE FRACTION 
CLR @OF LAG 3NO INTERRUPT 
JSR R7,MODSUB 300 TEST 
. WORD 23252, 125252, 125252, 125252 ACO 
-WORD 40300,0,0,0 sF SRC 
-WORD 23377,-1,-1.,-1 sFRACTIONAL RESULT 
-WORD 0,0,0,0 : INTEGER RESULT 
-WORD 253 s TEST FPS 
-WORD 240 sRESULT FPS 
38/ROUND INTEGER 
CLR @OF LAG 3NO INTERRUPT 
JSR R7,MDO0SUB 300 TEST 
-WORD 76600,0,0,125252 3ACO 
. WORD 40300,0,0,0 3F SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
.WORD 76700,0,0,-1 3; INTEGER RE SULT 
-WORD 200 ; TEST FPS 
-WORD 204 sRESULT FPS 
39/ROUND THROUGH FRACTION 
CLR @0F LAG 3NO INTERRUPT 
JSR R7,.MOOSUB 300 TEST 
«WORD 41525,052525,52525,52525 ACO 
-WORD 40300,0,0,0 sF SRC 
-WORD 40177,-1,-1,177740 sFRACTIONAL RESULT 
-WORD 41636,0,0,0 s INTEGER RESULT 
. WORD Ane, 3 TEST FPS 
. WORD 7700 sRESULT FPS 
;/OVERFLOW, TRAPS ENABLED 
MOV @1,90FLAG ; INTERRUPT 
JSR R7.MDODSUB ;D0 TEST 
. WORD “le 1.-1.-1 ;ACO 
-WORD 40400,0,0,0 sF SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 


COKDABO K011-6 


COKDAB.P11 


CLUSTER MACYLI 80( 1046) 
05-APR -84 16:45 


000000 

100177 77777) «177777 
177777 

007700 

107? 

000010 


005037 002776 
004767 000270 
000000 


056 700 000000 
177777 
044440 177777 177777 
177777 


012737 000002 002776 
004767 000212 
000000 


066600 000000 
000000 
066600 000000 000000 


000000 
000000 000000 000000 


000000 
015200 000000 000000 
000000 
047700 
147706 
000010 


012737 000002 002776 


012737 000001 002776 
100277 000001 000002 
100300 000001 000001 
040417 040001 077405 


ve 

BS 
O5S-APR-84 16:45 PAGE 261 
FLOATING POINT TESTS 


. WORD 100177, -1,-1,-1 s INTEGER RESULT 
. WORD 7700 s TEST FPS 
. WORD 107706 sRESULT FPS 
WORD 10 sFEC 
:/ INTEGER 2 TO 56 BITS 
CLR @OFLAG sNO INTERRUPT 
JSR R7,MD0SUB 3:00 TEST 
. WORD 56700,0,0, -1 3ACO 
. WORD 44440, . i. -$. -1 3— SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
-WORD 63161,100000,1,40775 s INTEGER RESULT 
«WORD 200 3s TEST FPS 
-WORD 204 sRESULT FPS 
;/OVERFLOW, TRAPS DISABLED 
MOV 02, 30F LAG sNO INTERRUPT 
JSR R7,MDOSUB 300 TEST 
-WORD 66600,0,0,0 3ACO 
-WORD 66600,0,0,0 sF SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
. WORD 15200,0,0,0 sINTEGER RESULT 
-WORDB 47700 3s TEST FPS 
. WORD 147706 sRESULT FRS 
WORD 10 sFEC 
3 /UNDERFLOW, TRAPS OISABLED 
MOV 02, 00F LAG 3NO INTERRUPT 
JSR R7,MODSUB 300 TEST 
~ WORD 100277,1.e. 1 3ACco 
. WORD 100300,1.1.1 sF SRC 
-WORD 0,0,0,0 sFRACTIONAL RESULT 
-WORD 06,0,0,0 s INTEGER RESULT 
. WORD 5200 3s TEST FPS 
. WORD i ~~} T FPS 
. WORD sFEC 
3 /UNDERF LOW TRAPS OENABL ED, UV AS "RESULT 
MOV 91,90F LAG s INTERRUPT 
JSR R?7,MO0SU8 300 TEST 
. WORD 100277,1,2. 1 3ACO 
. WORD 100300,1,1.1 sF SRC 
. WORD 40417,40001, °7404,0 sPRACTIONAL RESLL! 


SEQ 0260 


CORDABO KDIL1 
COKDAB. 


14408 
14409 
14410 
14411 
14412 
14418 
14414 
14415 
14416 
1441° 
14418 
14419 
14420 
14821 
14422 
14823 
14424 
14425 
14426 
14427 
14428 
14429 
14330 
1443) 
14432 
14433 
14424 
14435 
14430 
14437 
14438 
14439 
14440 
14441 
14442 
14443 
14444 
14445 
14446 
14447 
14448 
143449 
14450 
14451 
14452 
14453 
14454 
14455 
14456 
14457 
14458 
14459 
14460 
14461 
14462 
14462 


Pil 


72662 
072670 
072672 
072674 
072676 


072700 


072704 
072706 
072714 
072720 
072722 
072724 
072730 
072732 
072734 
072740 
072744 


072746 
072750 


072752 
072760 
072762 


072764 


072770 
072776 
073000 


073002 
073006 
073010 
073012 
973016 
073020 


Cc 


012605 
012737 
012702 
170102 
172415 
012701 
172511 
010501 
062701 
016502 
170102 


171411 
170011 


032737 
001420 
104003 


000167 


032737 
001003 
104003 


000167 
012604 
005726 
022704 
001401 
104003 


B CLUSTER 
O05 - APR - 84 


MACY1L1 3001046) 
16:45 


000000 


000244 


072770 
000200 


071500 


000010 


000040 


000001 


000032 


000001 


000014 


072750 


000000 


000244 


002776 


002776 


05 -APR-84 1 


7:45 PAGE 262 


FLOATING POINT TESTS 


0,0,0,0 


2200 
102200 
le 


s INTEGER RESULT 
s TEST FPS 


sRESULT FPS 
sFEC 


sJUMP OVER SUBROUTINE 


gp eXeXeXeXeXaXeXaXaxXeXeXeXeXexeXeXeXeXeXeXexeXeXeXexXeXexexey 
sOAOKXOXOKeKXeXeXeXaXeXeXeXeXeXeKXeKexeKeXaXeXexexXexexexexaxer 


ACO 
FSRC 


FRACTIONAL RESULT 


INTEGER RESULT 


FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


(FEC) 


‘ 
gs OXOKXOKOK KOK OK OK AKOKOKSXOKOKSK SK OK OKOXSKOXeXeKeKXeXxXeKeXeXex 
geXeXeXeXeXeXeXeXeXeXeXaXeXeXeXaXexexeKXeXenrexeXeXexeXexexex 


3 

MDOSUB: MOV (SP)+,R5 
MOV 2508 , BOF PVEC 

Vv 200 ,R2 

LOFPS R2 
LOD CRS), ACO 
MOV @MODGAR ,R 
LOO CR1),AC1 
MOV RS,.R1 
ADD #10,R1 
MOV 40(R5),R2 
LOFPS R2 

3 
MODD (R1),ACO 

18: SETO 

3 

s INSTRUCTION DIDNT TRAP 
BIT 01, a0FLAG 
BEQ es 
ERROR 3 
JMP es 

3 

s INSTRUCTION TRAPPED 

508: BIT 01, @0F LAG 
BNE 51% 
ERROR 3 
JMP es 

518; MOV CSP )+, RO 
TST (SP )e 
CMP O1%,R4 
BEG 2s 
ERROR +3 


s RETURN ADORESS TO USE AS POINTER 
sREDIRECT TRAP VECTOR 

3SET TO DOUBLE MODE FOR LOAD 

3LOAD FPS 

:LO0AD ACO WITH TEST CATA 

sLOAD KNOWN INTO AC1 


‘ 
sPOINT TO FSRC DATA 


sGET TEST FPS 
sLOAD TEST FPS 


seTEST INSTRUCTION 
sWAIT FOR POSSIBLE FPA TRAP. 


sVERIF 1 A NO TRAP CONDITION 
sBRANCH IF GOOD 
3FPP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
sREJOIN CODE 


sSEE IF EXPECTING A TRAP 
;BRANCH IF EXPECTING A TRAP 
3FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
sREJOIN CODE 
3SEE IF PC = INSTRUCTION 
sCLEAN UP STACK 


° 

sBRANCH IF GOOD COMPARE 
3FPP ERROR 
sPC WAS INCORRECT 


SEQ 0261 


COKDARO KDJ1L1 BC 
COKDAB P11 


14464 
14465 
14466 


073032 


073036 
073040 
073044 
073046 


073050 


073072 
073074 
073076 
073102 
073106 
073112 
073114 


073116 
073122 
073124 
073130 
073132 
073136 
073140 
073142 


073144 
073150 


073150 


073150 
073154 
073162 
073164 


05 


LUSTER 


mace 50( 1046) Ponte - 84 


ChPR 84 16:4 


170203 
012702 
170102 
012701 


174011 
026503 
001401 
104003 


010504 
062704 
004767 
005767 
001401 
104003 


174111 


000200 
003102 


000042 


000020 
040400 
107772 


000030 
040354 
107746 


002776 
000044 
000044 


000170 
000000 000000 


000000 000000 


D5 


TING POINT tester 763 


i COMMON CODE FOR TRAP AND NO TRAP 


2s: STFPS R3 
MOV #200 ,R2? 
ig Re 
MRECDST,R1 
3 SAVE FRACTIONAL RESULT 
STO ACO,C(R1) 
CMP 42(RS), R3 
BEQ 3$ 
ERROR 3 
3%; MOV RS,R4 
ADD 20,R4 
4s; JSR R7,DATVER 
TST COUNT 
BEQ S$ 
ERROR 3 
;SAVE INTEGER RESULT 
58: STO AC1,(R1) 
MOV R5,R4 
ADD @30,R4 
J R7, OATVER 
TST Cc 
BEQ 6$ 
ERROR +3 
68: TST @OF LAG 
BNE 7$ 
JMP 44(R5) 
7$: STST R1 
MOV 44(R5),R4 
CMP R4,R1 
BEQ 8$ 
ERROR 3 
8$ JMP 46(R5) 
3 
HOP 15: 


sTEST STCFD 


MSFD: 

3 

31/AC-0 
JSR R7,SFOSUB 
. WORD 0177,0,0,1 
WORD 0,0,0,0 


sSAVE FPS 
sSET FPP TO DOUBLE 


sPOINT TO RECEIVED DATA TABLE 


sSAVE ACO RESULT 
sVERIFY STATUS 
sBRANCH IF GOOD 
3 PP ERROR 
sBAD FPS 
sPOINT TO EXPECTED DATA 


sVERIF ¢ DATA 


;BRANCH IF GOOD 
3FPP ERROR 
:BAD ACO 


sSAVE AC1 RESULT 
sPOINT TO EXPECTED 


sVERIFY DATA 


3 
sBRANCH IF GOD 

3FPP ERROR 

sBAD ACL 
3SEE IF NEED TO CHECK FEC 
sBRANCH IF NEED TO CHECK 
sRETURN FROM TEST 
sSAVE FEC 
;GET FEC 
sVERIFY FEC 
sBRANCH IF GOOD 

3F PP ERROR 
3BAD FEC 

sRETURN FROM TES? 


300 TEST 
3ACO 


sRESULT 


SEQ 0262 


COKDABO KDJ11-B CLUSTER 


COKDAB P11 


14520 
14521 
14522 
14523 
14524 
14525 
14526 
14527 
14528 
14529 
14530 
14531 
14532 
14533 
14534 
14535 
14536 
14537 
14538 
14539 


073172 
073174 
073176 


073200 
073204 
073212 
073214 
073222 
073224 
073226 


073230 
073234 
073242 
073244 
073252 
073254 
073256 


073260 
073264 
073272 
073274 
073302 
073304 
073306 


073310 
073314 
073322 
073324 
073332 
073334 
073336 


073340 


073344 
073346 
073354 
073360 
073362 
073364 


O05 - APR -84 


000000 
047557 
047544 


004767 
077577 
177777 
077577 
000000 


007540 
007540 


004767 
100377 


000000 
100377 
000000 


012605 
012737 
012702 
170102 
172415 
012701 


he 


MACY11 3001046) O5-APR-84 16:45 PAGE 264 


16:45 


000140 
177777) «177777 


177777 000000 


000110 
177777 100000 


177777 000000 


000030 
125252 125252 


125252 000000 


000104 


073442 000244 
000200 


003102 


FLOATING POINT TESTS 


. WORD 47557 3 TEST FPS 
WORD 47544 sRESULT FPS 
32/AC>0, TRUNCATE 
JSR R7,SFOSUB 300 TEST 
. WORD 77577,-1,-1.-1 3ACO 
WORD 77577,-1,0,0 sRESULT 
WORD 7540 3; TEST FPS 
.» WORD 7540 sRESULT FPS 
33/AC<O, ROUND 
JSR R7,SFOSUB 300 TEST 
. WORD 100377, -1,100000,0 3ACO 
. WORD 100377, -1,0,0 sRESULT 
. WORD 7517 3 TEST FPS 
. WORD 7510 sRESULT FPS 
34/AC=-0 
JSR R7,SFOSUB 300 TEST 
. WORD 100000,0,0,0 3ACO 
WORD 0,0,0,0 sRESULT 
. WORD 7757 3s TEST FPS 
. WORD 7744 sRESULT FPS 
35/7AC<O0 
JSR R7,SFOSUB 300 TEST 
. WORD 125252, 125252, 125252, 125252 sACO 
WORD 125252, 125252,0,0 sRESULT 
. WORD i?) 3; TEST FPS 
WORD 10 sRESULT FPS 
6 
JMP HOP 16 sGET OVER SUBROUTINE 


gOoXeXeXeXeXaXaXeXeXexXeXeXexeXeXeXeXeXeXeXeXaxXeXaexaeXeXexXexex 
gs OXeXeXeXeXeXeXeXeXeXeKeXeXaeXeXeKeXeXeXexeXeXeXeXaXaxeXeXex 


sSTCFO 

3 ACO 

8 RESULT 

: FPS BEFORE EXECUTION 
: FPS AFTER EXECUTION 


3 

; THERE CAN BE NO TRAPS WITH THE STCFD INSTRUCTION 
poXeXeXeXeXeXaeKexaXaXeXeXeXeXeXaeXeXeXeXeXeXeXeXexXaKexeXexex 
goXeKXeXeXeXeXeXeXeXexexaeXeXeXeXeXeXeXeXaeXeXeXeXeXeXaXxeXexex 


3 
SFOSUB: MOV (SP)+,R5 3 RETURN ADDRESS TO USE AS POINTER 
MOV 050% ,aoF PVEC sREDIRECT TRAP VECTOR 
MOV 0200 ,R2 sSET TO DOUBLE MODE FOR LOAD 
LOFPS Re sL. OAD FPS 
LOO CRS),ACO sLOAD ACO WITH TEST DATA 


MOV @RECDST,R1 sPOINT TO RESULT AREA 


SEQ 0263 


COKDABO KDI11-8 we heen 
COKDAB.P11 05 -APR 


14576 073370 
14577 073374 


073376 


016502 
170102 


176011 


170203 
016502 


073450 


073450 
073454 
073460 
073466 
073470 
073474 
073476 


073500 
073504 
073510 
073516 
073520 
073524 
073526 


MACYL1 30( 1046) 
-84 16:45 


000020 


000022 


000024 


000200 


FS 
05 - APR -84 6:45 PAGE 265 
FLOATING POINT TESTS 
MOV 20(R5),R2 3GET TEST FPS 
LOFPS R2 3LOAD TEST FPS 
: 
408: STCFD ACO,C(R1L) 3¢TEST INSTRUCTION 
3 
s INSTRUCTION DIONT TRAP 
;VERIFY STATUS 
2s: STFPS R3 ;SAVE FPS 
MOV 22(R5),R2 3GET EXPECTED STATUS 
CMP R2,R3 sVERIFY STATUS 
BEQ 3$ ;BRANCH IF GOOD 
ERROR +3 3FPP ERROR 
3BAD FPS . 
3$; MOV R5,R4 sPOINT TO EXPECTED DATA 
ADD #10,R4 
4$: er ae ,DATVER ;VERIFY DATA 
BEQ S$ ;BRANCH IF GOOD 
ERROR +3 3FPP ERROR 
;BAD ACO 
5$ JMP 24(R5) ;RETURN FROM TEST 
S INSTRUCTION TRAPPED 
508: ERROR +3 3;FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
JMP 24(R5) ;RETURN FROM TEST 
3 
HOP 16: 
3 
8 
: -—-—*« eee eee eee rr er rr rr rr ee re rr ere 
3TEST STCOF 
8 
3 
3 
3 
MSOF ;: 
31/AC=0 
CLR OF LAG 3NO INTERRUPT 
JSR R7,SDF SUB 300 TEST 
. WORD £77,0,0,0 ;ACcoO 
.WORD 0,0 sRESULT 
-WORD 200 3 TEST FPS 
-WORD 204 sRESULT FPS 
32/AC=-0 
CLR @eFLAG 3NO INTERRUPT 
JSR R7,SDFSUB 300 TEST 
. WORD 100000 ,, 300,200,100 :ACO 
. WORD 0,0 sRESULT 
—— 7777 3 TEST FPS 
7744 sRESULT FPS 
33/AC>0, TRUNCATE 


SEQ 0264 


ey a @ -B wre 


COKDAB 


14632 
14633 
14634 
14635 
14636 
14637 
14038 
14639 
14640 


073530 


073700 
073702 
073710 
073714 
073716 
073720 
073724 
073730 


MACY 11 


R-84 16:45 


005037 
004767 
055555 
177777 
055555 
000240 
000240 


012737 
004767 
077777 


001200 
101206 


012737 
004767 
077777 
000000 


000000 
006700 
006 706 


000167 


012605 
012737 
012702 
170102 
172415 
012701 
016502 
17C102 


002776 
000140 
055555 


055555 


000001 
000106 
177777 


000000 


002776 
000056 
125252 
125253 


000002 
000024 
177777 


000000 


000202 


073756 
000200 


003102 
000014 


30( 1046) 


177777 


002776 
100000 


125252 


002776 
177777 


000244 


G5 


OS-APR-84 16:45 PAGE 266 


FLOATING POINT TESTS 


CLR @OF LAG sNO INTERRUPT 
JSR R7, SOF SUB :D0 TEST 
-WORD 55555,55555,-1,-1 ACO 
-WORD 55555,55555 sRESULT 
-WORD 240 ; TEST FPS 
WORD 240 sRESULT FPS 
34/AC<0, »ROUND TO UNDEFINED VARIABLE 
@1,@0FLAG s INTERRUPT 
ISR R7, SOF SUB 300 TEST 
. WORD 77777, -1,100000,0 3ACO 
-WORD 0,0 sRESULT 
. WORD 1200 3 TEST FPS 
. 101206 sRESULT FPS 
357AC<0, ROUND 
CLR QOFLAG 3sNO INTERRUPT 
JSR R7, SOF SUB 300 TEST 
-WORD 125252,125252, 125252, 125252 ACO 
-WORD 125252,125253 sRESULT 
. WORD 7700 ; TEST FPS 
WORD 7710 sRESULT FPS 
36/ROUND TO UV, TRAPS DISABLED 
MOV #2, Q0F LAG 3s INTERRUPT 
JSR R7, SOF SUB 3:00 TES’ 
. WORD P7777, -1e°4.O ACO 
-WORD 0,0 sRESULT 
-WORD 6700 3; TEST FPS 
-WORD 6706 sRESULT FPS 
$ 
JMP HOP 17 ;GET OVER SUBROUTINE 


gOeXeXeXeXeXeXeXeKaXeXaeXeXeXeXaXaXaXaXeXeKXeXeXaxaXexeXxeXeXxex 
goXeXeXeXeXeXeXeKeXeXaXeXeXexeXeXeXexeXeXaXeXeXexeXeXexeXex 


3; STCDF 

ry ACO 

3 RESULT 

3 FPS BEFORE EXECUTION 
: FPS AFTER EXECUTION 


3 

3A TRAP CAN ONLY OCCUR IF ROUNDING CAUSES OVERFLOW 
geXeXaeXaeXeXKeXaXeXKeXaXaXeXeXeXeXeXaXaeXeXeXeXaXeXeXeKXeXeXeXeX 
geXeXeXeKeXeXeKeXaeXeXaXaeXeXaeXeXeXaeXeXeXeXeXeXeXeXeXxeXaXeXeax 


3 
SDF SUB: MOV (SP)+,R5 s RETURN ADDRESS TO USE AS POINTER 
MOV 950% ,aoF PVEC sREDIRECT TRAP VECTOR 
MOV #200 ,R2 sSET TO DOUBLE MODE FOR LOAD 
LOFPS Re sLOAD FPS 
LOD (RS), ACO sLOAD ACO WITH TEST DATA 
MOV @RECOST ,R1 sPOINT TO RESULT AREA 
MOV 14(R5),Re 3;GET TEST FPS 


LOFPS Re sLOAD TEST FPS 


SEQ 0265 


COKDABO KDI11 B 


COKDAB.P 11 


14088 
14689 
14690 
14691 
14692 
14693 
14694 
14695 
1469 
14697 
14698 
14099 
14700 
14701 
14702 
14703 
14704 
14705 
14706 
14707 
14708 
14709 
14710 
14711 
14712 
14713 
14714 
14715 
147lo 
14717 
14718 
14719 
14720 
14721 
14722 
14723 
14724 
14725 
14726 
14727 
14728 
14729 
14730 
14731 
14732 
14733 
14734 
14735 
14736 
14737 
14738 
14739 
14740 
14741 
14742 
14742 


073732 
073734 
073736 


073740 
073746 
073750 


073752 


073756 
073764 
073766 


073770 
073774 
073776 
074000 
074004 
074006 


074010 
074012 
074016 
074020 
074022 


074024 
074026 
074032 
074036 
074042 
074044 


074046 
074052 
074054 


074060 
074064 
074066 
074072 
074074 


074076 
074102 


CLUSTER MACY11L 30( 1046) 
oS. APR - 84 


176011 
170327 
000000 


032737 
001420 
104003 


000167 


032737 


170203 
016502 
020203 
001401 
104003 


010504 
062704 
004767 
005767 
001401 
104003 


005737 
001002 
000165 


012704 
170314 
021427 
001401 
104003 


000165 


16:45 


000001 


000032 


000001 


000014 


073734 


000016 


000010 
037406 
107016 


002776 


002776 


002776 


s*TEST INSTRUCTION 
sWAIT FOR POSSIBLE FPA TRAP, 
sSTORE STATUS HERE. 


:VERIFY A NO TRAP CONDITION 
;BRANCH IF GOOD 
:FPP ERROR 
; INSTRUCTION SHOULD HAVE TRAPPED 
sREJOIN CODE 


sSEE IF EXPECTING A TRAP 
;BRANCH IF EXPECTING A TRAP 
;FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
sREJOIN CODE 
;SEE IF PC = INSTRUCTION 
;CLEAN UP STACK 


o 

sBRANCH IF GOOD COMPARE 
3FPP ERROR 
3PC WAS INCORRECT 


sSAVE FPS 
;GET EXPECTED STATUS 
;VERIFY STATUS 
sBRANCH IF GOOD 
3—PP ERROR 
;BAD FPS 
sPOINT TO EXPECTED DATA 


sVERIFY DATA 


sBRANCH IF GOOD 

3FPP ERROR 

;BAD ACO 
;SEE IF NEED TO CHECK FEC 
;BRANCH IF NEED TO CHECK 
;RETURN FROM TEST 


sPOINT TO FEC AREA 
3;SAVE FEC 
;VERIFY FEC FOR OVERFLOW 
;BRANCH IF GOOD 
3;FPP — 
BAD FEC 
;RETURN FROM TEST 


05 -APR 16:45 PAGE 267 
FLOATING ePOINT TESTS 
i 
403: STCOF ACO,(R1) 
1$: STST (PC)> 
.» WORD 0 
} INSTRUCTION DIONT TRAP 
BIT #1,@0F LAG 
BEQ 2s 
ERROR 3 
JMP es 
} INSTRUCTION TRAPPED 
508; BIT #1,90FLAG 
BNE 51$ 
ERROR +3 
JMP es 
518: MOV (SP )+,R4 
TST (SP )+ 
CMP @1$,R4 
BEQ 2s 
ERROR 3 
: 
3C CODE FOR TRAP AND NO TRAP 
;VERIFY STATUS 
2s: STFPS R3 
MOV 16(RS),R2 
CMP R2,R3 
BEQ 3$ 
ERROR +3 
3$: MOV RS,R4 
ADD 10,R4 
4$: JSR R7,DATVFR 
TST COUNT 
BEQ S$ 
ERROR 3 
S$: TST @eFLAG 
BNE 7$ 
JMP 2zoc( Rs) 
;VERIFY FEC 
7$: MOV MRECFEC,R4 
STSsT (R4) 
CMP (R44), #10 
BEQ 8&$ 
ERROR 3 
8S: JMP 20(R5) 
3 
HOP17: 


SEQ 0264 


COKDABO KDJ11 6 avers MACY11 30(1046) 05-APR-84 
-84 16:45 


COKDAB.P11 
14744 


147485 
14746 
14747 
14748 
14749 
13750 
14751 
14752 
14753 
14754 
14755 
14756 
14757 
14758 
14759 
14760 
14761 
14762 
14763 
14764 
14765 
14766 
14767 
14768 
14769 
14770 
14771 
1477e 
14773 
14774 
14775 
14776 
14777 
14778 
14779 
14780 
14781 
14782 
14783 
14784 
14785 
14786 
14787 
14788 
14789 
14790 
14791 
14792 
14793 
14794 
14795 
14796 
14797 
14798 
14799 


074102 


074102 
074106 
074110 
074112 
074114 
074116 
074122 
074124 


074126 
074132 
074134 


074136 


074136 


074136 
074142 
074146 
074150 
074152 
074156 
074160 
074162 
074166 
074172 
074176 
074200 


074202 
074204 
074210 
074212 


074214 


05 - APR 


012701 


022703 
001401 
104003 


012701 


170202 
020227 
001401 
104003 


040000 


140000 


000002 


003724 
000200 


003102 


003254 
037270 
106662 


000204 


| Cc 
ail 
6:45 Faas 268 
FLOATING POINT TES 


sTEST STCFD - USING ILLEGAL ACCUMULATOR 


sOISABLE INTERRUPTS 


3 

s*TEST ILLEGAL INSTRUCTION 
sSAVE STATUS 

sSAVE FEC 

;VERIFY FER SET 

;BRANCH IF ERROR RECEIVED 


sFER BIT NOT SET ON ILLEGAL INST. 
;VERIFY FEC = FLOATING OPCDOE ERROR 
sBRANCH IF GOOD 


sPOINT TO DATA 
;SET FPP STATUS TO DOUBLE 


; 

sPOINT TO DATA BUFFER 
sSTORE GARBAGE 

sCLEAR DATA BUFFER 
;VERIFY BUFFER =0 


3 
sBRANCH I RECDST = 0 


sRECOST NOT CLEARED 
sSAVE STATUS 
sVERIFY STATUS 
sBRANCH IF GOOD 


MSFOI 
3 
MOV #40000 ,R1 
LOFPS R1 
STCFD ACO, AC6 
STFPS Ro 
STST R3 
CMP #140000 ,R2 
BEQ 1$ 
ERROR 3 3FPP ERROR 
1$: CMP 42,R3 
BEQ 2s 
ERROR 3 3FPP ERROR 
3sFEC INCORRECT 
2s: 
Fy 
Fy 
ca ORR GSS CONAN CR eR Ea CO sane 
3; TEST CLRD 
3 
3 
3 
Fy 
MCLRD: 
3 
MOV @TAB47,R1 
MOV #200 ,R4 
LOFPS R4 
LOD €R1),ACO 
MOV @RECDST,R1 
STO ACO,(R1) 
CLRD (R1) 
MOV ¢TAB6,R4 
JSR R7,DATVER : 
TST COUNT 
BEQ 1$ 
ERROR +3 ;—PP ERROR 
1$: STFPS R2 
CMP R2, #204 
BEQ es 
ERROR 3 3FPP ERROR 
, ;BAD STATUS 
2s; 


SEQ 0267 


COKDABO KDJ11-B CLUSTER MACY11 30(1046) 05-APR-84 


COKDAB.P11 


074214 


074214 


074240 
074244 
074246 


074250 


074250 


074250 
074254 
074260 
074264 
074272 
074274 
074276 
074302 
074304 


074306 
074312 
074314 


074316 
074324 
074326 


0S -APR-84 16:45 


022705 
001401 
104003 


012704 
012714 
012701 
012737 
170114 
170211 
020427 
001401 
104003 


020127 
001401 
104003 


023727 
001406 
104003 


040200 


140200 


000002 


003122 
147757 
003072 
074334 


003122 


003072 


003072 


000244 


147757 


i 
mw 
16:45 PAGE 269 
FLOATING POINT TESTS 


MCLRI: 
8 
MOV #40200 ,R4 
LOFPS R4 
CLRO R6 
STFPS R3 
SY5T RS 
CMP #140200 ,R3 
BEQ 1$ 
ERROR 3 
1$: CMP 2,R5 
BEQ 2s 
ERROR +3 
es: 


MLS1: 

Fy 
MOV #TSTLOC,R4 
MOV 9147757,(R4) 
MOV MRECST,R1 
MOV #10$ ,aeFPVEC 
LOFPS (R4) 
STFPS (R1) 
CMP R4,4eTSTLOC 
BEQ 1$ 
ERROR 3 

1%: CMP R1,@RECST 
BEQ 2s 
ERROR 3 

2s: cmMP @eRECST, #147757 
BEQ 3$ 
ERROR +3 


sDISABLE INTERRUPTS 
sLOAD STATUS 
s@TEST INSTRUCTION WITH ILLEGAL ACC 
sSAVE STATUS 
sSAVE FEC 
;VERIFyY ERROR 
;BRANCH IF FER SET 
;FPP ERROR 
sERROR IN FPS 
sVERIFY FEC =2 OPCODE ERROR 
;BRANCH IF GOOD 
3FPP ERROR 
;BAD FEC 


sPOINT R4& TO RAM 
sSETUP EXPECTED STATUS 
;SET BUFFER FOR RECEIVED STATUS 
;SETUP TRAP VECTOR 
;¢TEST INSTRUCTION 
3¢TEST INSTRUCTION 
;VERIFY R4 
sBRANCH IF GOOD 
;FPP ERROR 
é 


;VERIFY RL 
sBRANCH IF GOOD 
3FPP ERROR 


;BAD R1 
;VERIFY STATUS 
sBRANCrH F GOOD 
3FPP ERROR 
;BAD STATUS\ 


COKDABO KDJ11 8B CLUSTER MACY11 30(1046) 05-APR-84 


COKDAB.P 11 


14856 
14857 
14858 


074330 


074334 
074336 
074340 


074342 


074342 


074342 
074346 
074352 
074356 
074364 
074366 
074370 
074374 
074376 


074400 
074404 
074406 
074410 
074416 
074420 
074422 
074426 
074430 
074432 


074434 


074434 


OS APR 84 16:45 


000167 


012600 
012605 
104003 


012704 
012714 
012701 
012737 
170124 
170221 
020427 
001401 
104003 


020127 
001401 
104003 


023727 
001406 
104003 


000167 
012600 


012605 
104003 


000006 


003122 
145557 
003072 
074426 


003124 


003074 


003072 


000244 


145557 


KS 


16:45 PAGE 270 


FLOATING POINT TESTS 


JMP 3$ 
sUNEXPECTED TRAP 


sGET OVER TRAP 


10$; MOV (SP )+,RO sSAVE PC 
MOV (SP )+,R5 sSAVE PS 
ERROR 3 ;FPP ERROR 
5 sUNEXPECTED TRAP 
$: 


MLS2: 

3 
MOV @TSTLOC,R4 
MOV #145557,(R4) 
MOV @RECST,R1 
MOV #10$ ,aeFPVEC 
LOFPS CR4)> 
STFPS (R1)> 
CMP R4,4TSTLOC+2 
BEQ 1$ 
ERROR +3 

1$: CMP R1, MRECST+2 
BEQ 2s 
ERROR +3 

2s: CMP @RECST, #145557 
BEQ 3$ 
ERROR +3 


JMP 3$ 
;UNEXPECTED TRAP 


10$: MOV (SP )+,RO 
MOV (SP)+-,R5S 
ERROR +3 

3$: 


sPOINT R4 TO RAM 


sSETUP EXPECTED STATUS 
;SET BUFFER FOR RECEIVED STATUS 


;SETUP TRAP VECTOR 

;#TEST INSTRUCTION 

3¢TEST INSTRUCTION 

;VERIFY R4 

;BRANCH IF GOOD 
3FPP ERROR 


3 
;VERIFY R1 
sBRANCH IF GOOD 
3;FPP ERROR 
;BAD R1 
;VERIFY STATUS 
;BRANCH F GOOD 
3-PP ERROR 
;BAD STATUS\ 
;GET OVER TRAP 


sSAVE PC 
;SAVE PS 
3FPP ERROR 
;UNEXPECTED TRAP 


SEQ 0269 


COKDABO KNI11 6B 
COKDAB.P11 


14912 
14913 
14914 
14915 
14916 
14917 
14918 
14919 
14920 
14921 
14922 
14923 
14923 
14925 
14926 
14927 
14928 
14929 
14930 
14931 
14932 
14933 
14934 
14935 
14936 
14937 
14938 
14939 
14940 
14941 
14942 
14943 
14944 
14945 
14946 
14947 
14948 


074434 
074440 
074446 
074454 
074460 
074466 
074474 
074476 
074500 
074504 
074506 


074510 
074514 
074516 


074520 
074526 
074530 


074532 


074536 
074540 
074542 


074544 


074544 


074544 
074550 
074556 
074562 
074570 
074572 
074574 
074600 
074602 


074604 
074610 
074612 


CLUSTER MACY1L1 


O05 -APR -84 


012704 
012737 
012737 
012701 
012737 
012737 
170134 
170231 
020427 
001401 
104003 


020127 
001401 
104003 


023727 
001406 
104003 


000167 


012600 
012605 
104003 


012704 
012737 
012701 
012737 
170144 
170241 
020427 
001401 
104003 


020127 
001401 
194002 


16:45 


003122 
003126 
147501 
003132 
003072 
074536 


003124 


003134 


003072 


000006 


003124 
147757 
003074 
074632 


003122 


003072 


30( 1046) 05-APR 
FLOATING POINT TESTS 


003122 
003126 


003132 
000244 


147501 


003122 
000244 


1$: 


JMP 3$ 
sUNEXPECTED TRAP 


10$: 


MLS4;: 


1$: 


-84 


MOV 


oe 


6:45 PAGE 271 


@TSTLOC ,R4 sPOINT R4 TO RAM 
@TSTLOC +4, aeTSTLOC sTSTLOC= DEFERRED ADDRESS 
#147501, ,8@TSTLOC +4 sSETUP EXPECTED STATUS 
#TSTLOC+10,R1 sR1 POINTS TO TSTLOC+10 
@RECST ,A@TSTLOC+10 sSET DEFERRED BUFFER FOR RECEIVED STATUS 
#10$ ,@aFPVEC ;SETUP TRAP VECTOR 
@CR4)-+ s#TEST INSTRUCTION 
aC R1)-> s¢TEST INSTRUCTION 
R4,@TSTLOC+2 sVERIFY R4 
1$ sBRANCH IF GOOD 
+3 3FPP ERROR 
° 
R1,@TSTLOC+12 ;VERIFY R1 
es ;BRANCH IF GOOD 
+3 3FPP ERROR 
;BAD R1 
QeRECST, #147501 ;VERIFY STATUS 
3$ ;BRANCH F GOOD 
+3 3FPP ERROR 


3BAD STATUS. 
;GET OVER TRAP 


(SP )+,RO sSAVE PC 
(SP)+,RS sSAVE PS 
+3 3FPP ERROR 


sUNEXPECTED TRAP 


#TSTLOC+2,R4 sPOINT R4 TO RAM 
#147757,a@TSTLOC sTSTLOC= STATUS ADDRESS 
MRECST+2,R1 ;SET BUFFER FOR RECEIVED STATUS 
#108 ,aeFPVEC ;SETUP TRAP VECTOR 
-(R4) 3*¢TEST INSTRUCTION 
-(RL) 3¢TEST INSTRUCTION 
R4,&@TSTLOC sVERIFY R4& 
1$ ;BRANCH IF GOOD 
+3 ;FPP ERROR 

‘ 
R1,@RECST sVERIFY R1 
es ;BRANCH IF GOOD 
3 3FPP ERROR 


;BAD RL 


SEQ 0270 


M5 


COKDABO KDJ11 B CLUSTER MACY11 30(1046) 0O5-APR-84 16:45 PAGE 272 

COKDAB.P11 05 -APR -84 16:45 FLOATING POINT TESTS SEQ 0271 
14968 074614 023727 003072 147757 28: CMP QeORECST, #147757 ;VERIFY STATUS 
14969 074622 001406 BEQ 3$ ;BRANCH F GOOD 
18970 074624 104003 ERROR +3 ;FPP ERROR 
14971 3BAD STATUS\ 
14972 074626 000167 000006 JMP 3$ ;GET OVER TRAP 
14973 sUNEXPECTED TRAP 
14974 074632 012600 10$: MOV (SP)+,RO sSAVE PC 
14975 074634 012605 MOV (SP)+,RS sSAVE PS 
14976 074636 104003 ERROR +3 3;FPP ERROR 
14977 ;UNEXPECTED TRAP 
14978 074640 3$; 
14979 
14980 
14981 H 
14982 H 
14983 dete ade ad lalate att alata le etett a tleelateteatateettate 
14984 ;TEST LDFPS, STFPS MODE 5 
14985 3 
14986 Hy 
14987 : 
14988 3 
14989 074640 MLSS: 
14990 
14991 H 
14992 074640 012704 003124 MOV #TSTLOC+2,R4 ;POINT R& TO RAM 
14993 074644 012737 003126 003122 MOV @#TSTLOC +4 ,aeTSTLOC sTSTLOC= DEFERRED ADDRESS 
14994 074652 012737 147501 003126 MOV #147501, ,aeTSTLOC +4 sSETUP EXPECTED STATUS 
14995 074660 012701 003134 MOV #TSTLOC+12,R1 3R1 POINTS TO 412 
14996 074664 012737 003072 003132 MOV #RECST,@@TSTLOC+10 3;SET DEFERRED BUFFER FOR RECEIVED STATUS 
14997 074672 012737 074742 000244 MOV #10$ ,ae@FPVEC ;SETUP TRAP VECTOR 
14998 074700 170154 LOFPS a-(R4) :*TEST INSTRUCTION 
14999 074702 170251 STFPS a-(R1) 3*TEST INSTRUCTION 
15000 074704 020427 003122 CMP R4,#TSTLOC ;VERIFY R& 
15001 074710 001401 BEQ 1$ ;BRANCH IF GOOD 
toes 074712 104003 ERROR +3 3;FPP ERROR 

3 

15004 074714 020127 003132 1$: CMP R1,#TSTLOC+10 sVERIFY R1 
15005 074720 001401 BEQ es sBRANCH IF GOOD 
15006 074722 104003 ERROR +3 ;FPP ERROR 
15007 ;BAD R1 
15008 074724 023727 003072 147501 23: CMP @ORECST, #147501 ;VERIFY STATUS 
15009 074732 001406 BEQ 3$ ;BRANCH F GOOD 
15010 074734 104003 ERROR +3 3;FPP ERROR 
15011 ;BAD STATUS\ 
15012 074736 000167 000006 JMP 3$ ;GET OVER TRAP 
15013 ;UNEXPECTED TRAP 
15014 074742 012600 10$: MOV (SP )+,RO sSAVE PC 
15015 074744 012605 MOV (SP)+,R5S sSAVE PS 
15016 074746 104003 ERROR 3 3;FPP ERROR 
15017 sUNEXPECTED TRAP 
15018 074750 3$: 
15019 
15020 
15021 ; 
15022 ; 


COKDABO KDJ11-B6 CLUSTER ne? 30( 1046 ) 
05 -APR - 84 45 


COKDAB.P11 


012704 
012737 
012701 
012737 
170164 
170261 
020427 
001401 
104003 


020127 
001401 
104003 


023727 
001406 
104003 


000167 


012600 
012605 
104003 


012704 
012737 
012737 
012701 
012737 
012737 
170174 
170271 
020427 
001401 


003126 
000244 


140001 


003122 
003126 


003124 
000244 


NS 


OS-APR-84 16:45 PAGE 275 
FLOATING POINT TESTS 


sTEST LOFPS, STFPS MODE 6 
‘ 


MLS6: 
3 
MOV #TSTLOC ,R4 ;POINT R4& TO RAM 
MOV #140001 ,@@TSTLOC +4 sSETUP EXPECTED STATUS 
MOV #TSTLOC+110,R1 3R1 WILL POINT TO TESTLOC+10 
MOV #10$ ,aeF PVEC ;SETUP TRAP VECTOR 
LOFPS 4(R4) 3#TEST INSTRUCTION 
STFPS -L00(R1) :@TEST INSTRUCTION 
MP R4,e@TSTLOC ;VERIFY R4 
BEQ 1$ ;BRANCH IF GOOD 
ERROR +3 3FPP ERROR 
1$: CMP R1,#TSTLOC+110 ;VERIFY R1 
BEQ es ;BRANCH IF GOOD 
ERROR +3 3FPP ERROR 
;BAD R1 
2s: CMP @°TSTLOC+10,4140001 ;VERIFY STATUS 
BEQ 3$ ;BRANCH F GOOD 
ERROR +3 3;FPP ERROR 


sBAD STATUS\ 


JMP 3$ 
sUNEXPECTED TRAP 
10$: MOV 


;GET OVER TRAP 


sSAVE PC 
sSAVE PS 


3FPP ERROR 


sUNEXPECTED TRAP 


3$: 


MLS?: 

e 
MOV @TSTLOC+100,R4 
MOV @TSTLOC +4, aeTSTLOC 
MOV #145501, ,a@@TSTLOC +4 
MOV @TSTLOC-70,R1 
MOV @TSTLOC+10,a0@TSTLOC +2 
MOV #108 ,aeFPVEC 
LOFPS @-100(R4) 
STFPS a72(R1) 
CMP R4, @TSTLOC-100 
BEQ 1s 


sPOINT R& TO RAM 

sTSTLOC= DEFERRED ADDRESS 
sSETUP EXPECTED STATUS 
sR1 POINTS TO TSTLOC-10 


3 
;SETUP TRAP VECTOR 
;¢TES? INSTRUCTION 
se¢TEST INSTRUCTION 
;VERIFY RG 
;6RANCH IF GOOD 


SEQ 0272 


) 
bie, 
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COKDAB P11 OS -APR 84 16:45 FLOATING POINT TESTS SEQ 0273 
ae 075126 104008 ERROR 3 3F PP ERROR 

15081 Fy 

15082 075130 020127 003032 1$: CMP R1,4TSTLOC- 70 sVERIFY RL 

15088 075134 001401 BEQ 2s sBRANCH IF GOOD 
15084 075186 104003 ERROR 3 3FPP ERROR 

15085 sBAD R1 

15086 075140 028727 003132 145501 C$: CMP 8oTSTLOC+10, 4145501 sVERIFY STATUS 
15087 075146 001406 BEQ 3$ ;BRANCH F GOOD 
15088 075150 104003 ERROR 3 3 PP ERROR 

15089 sB8AD STATUS\ 

15090 075152 000167 000006 JMP 3% sGET OVER TRAP 
15091 sUNEXPECTED TRAP 

15092 075156 012600 108; MOV (SP )+,RO sSAVE PC 
15093 075160 012605 MOV (SP )>+,RS sSAVE PS 
15094 075162 104003 ERROR 3 3FPP ERROR 

1S 25 sUNEXPECTED TRAP 

15096 075164 38; 

15097 

15098 

15099 FY 

15100 3 

cee fo ee ee ee hig Se eens « 

15102 iTEST LOCLO MODE 2? 

15103 3 

15104 3 

15105 3 

15106 

15107 075164 MLOC2: 

15108 

15109 ; 

15110 075164 005001 CLR R1 ;INIT Ri 

15111 075166 012704 007700 MOV @7700,R4 3*PS=*DOUBLE, LONG 
iSili2 O75172 170104 LOFPS RO 3 

15113 075174 012737 075230 000244 MOV 0108 ,QOFPVEC sSETUP WILD TRAP 
15114 075202 177027 LOCLO (R7)+,ACO seTEST INSTRUCTION 
15115 075204 005201 INC R1 3 

15116 075206 005201 INC Ri 3 

15117 075210 005201 INC R1 3 

15118 075212 005201 INC R1 3 

15119 075214 020127 0000038 CMP Ri, os sVERIF y 

15120 075220 001406 BEQ 18 sBRANCH IF GOOD 
15121 075222 104003 ERROG 3 3FPP ERROR 

15122 s INSTRUCTION FAILED 

15123 075224 000167 000006 JMP 18 sJUMP OVER WILD TRAP 
15124 075230 012600 108; MOV (SP )+,RO sSAVE PC 

15125 075232 012605 MOV (5P)6,RS sSAVE PS 
15126 075234 104003 ERROR °§ 3—PP ERROR 

15127 sWILCO TRAP ON INSTRUCTION 
15128 075236 012704 003264 1$: MOV @TAB6A,R4 sPOINT TO EXPECTED DATA 
15129 075242 012701 003102 MOV @RECDST,R1 sPOINT TO DATA BUFFER 
15130 075246 174011 STO AcO,(R1) sVERIFY DATA 

15131 075250 004767 036206 JSR R7,DATVER 3 

15132 075254 005767 105600 Ts! COUNT 

15138 075260 001401 BEQ os sBRANCH [F GOOD DATA 
15134 975262 104008 ERROR 3 37 PP ERROR 


15135 s8AD DATA 


COKDABO KDIL1 8B CLUSTER MACYL1 8071046) 


COKDAB LP 11 


4 

betes 
15188 
15189 
15140 
15141 
15142 
15148 
15144 
15145 
15146 
15147 


OTS Oo4 


O7S264 


075264 
075270 
075274 
075300 
075302 


075304 
075310 
075314 
075320 
075322 


075324 
075330 
075334 
075340 
075342 


075344 
075350 
075354 
075360 
075362 


075364 
075370 
075374 
075400 
075402 


075404 
075410 
075414 
075420 
075422 


075424 
075430 
075434 
075440 


OS APR 84 16;45 


Ch 


05 APR 84 16:45 PAGE 0/75 
FLOATING POINT TESTS 


es: 


MLCF;: 


3 
s1/INT*0O 


JSR 


JS 


. WORD 
37/INT+ -40000 

JSR 

. WORD 


TEST LOCIF, LOCLF 


R7, LCF SUB 


0,0 


R7,LCF SUB 
40000 ,0 
43600,0 


.¢) 
a? LCF SUB 
ce) 


R?, LCF SUB 
252 25252 
42052,0 

.¢) 


0 
R7,LCF SUB 
-4 


0000,0 
143600,0 
? 


300 TES’ 
3— SRC 


sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TEST 
sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TEST 
sF SRC 
sRESULT 
3s TEST FPS 
sRESULT FPS 


300 TEST 
3sF SRC 


sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TES! 
3sF SRC 


sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TEST 
3sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TEST 


gRE St T 
3 TEST FRY 


sF SRC 


SEQ 0274 


CORDARO KOULL 
COKDAB P11 


15192) O7S44O 


15194 075444 
15195 075450 
15196 075454 
15197? 075460 
15198 075462 


15200 075464 
15201 075470 
1S2C2 075474 
15203 075500 
15204 075502 


15206 075504 
15207 075510 
15208 075514 
15209 075520 
15210 075522 


15212 075524 
15213 075530 
15214 075534 
15215 075540 
15216 075542 


15218 075544 
15219 075550 
15220 075554 
15221 075560 
1S222 075562 


15224 075564 
15225 075570 
15226 075574 
15227 075600 
iS228 075602 


15230 075604 
15231 075610 
15232 075614 
15233 075620 
15234 075622 


15236 075624 
15237 075630 
15238 075634 
15239 075640 
15240 075642 


15242 075644 
15243 075650 
15244 075654 
15245 075660 
15246 075662 


B CLUSTER aed! 80( 1046) 
O5-APR 84 10;4° 

000010 

004767 000320 

177777 000000 

140200 000000 

000007 

000010 


004767 000140 
125252 125252 
147652 125255 


004767 000120 
077777 177500 
047777 177777 


[LF 


05 APR-84 :45 PAGE 2/6 
FLOATING POINT Tests 

. WORD 10 
38/INT=-1 

JSR R7,UCF SUB 

. WORD -1,0 

~WORD 140200,0 

.WORD 7 

. WORD 10 
397INT=PATTERN 

JSR R7,LCF SUB 

.WORD 125252, 125252 

.WORD 143652, 126000 

. WORD 7 

.WORD 10 
3: 10/7LONG=40000 

JSR R7,LCF SUB 

.WORD 40000, 

. WORD 47600,0 

. WORD 117 

. WORD 100 
311/LONG*1 

JSR R7,c_CF SUB 

. WORD 0,1 

.WORD 40200,0 

. WORD 7557 

. WORD 7540 
312/LONG=PATTERN 

JSR R7,LCF SUB 

. WORD 0,252 

. WORD 42052,0 

. WORD 7557 

. WORD 7540 
313/LGNG = -40000 

JSR R7, LCF SUB 

~ WORD -4 .O 

. WORD 147600,0 

{WORD 107, 

.WORD 110 
314/LONG=-1 

JSR R7,LCFSUB 

. WORD -1,-1 

~ WORD 140200,0 

.WORD 7500 

. WORD 7510 
315/LONG=PATTERN 

JSR R7,LCF SUB 

. WORD 125252,125252 

.WORD 147652,125253 

. WORD 105 

» WORD 110 
316/LONG*77777,177500 

JSR R7, LCF SUB 

.WORD 77777,177500 

.WORD 47777,177777 

.WORD 117 

»WORD 100 


3177 ONG+40000, 100 


sRESULT FPS 
300 TEST 


sF SRC 

sRESULT 
3: TEST FPS 
sRESULT FPS 


300 TEST 

3sF SRC 

sRESULT 
3; TEST FPS 
sRESULT FPS 


300 TEST 
sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TEST 
sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 


3D0 TEST 
3sF SRC 
sRESULT 
: TEST FPS 
sRESULT FPS 


300 TEST 

sF SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


300 TEST 


3— SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


30J TEST 

3F SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


3:00 TEST 

sF SRC 

sRESULT 
3 TEST FPS 
sRESULT FPS 


SEQ 027% 


_— 


COKDABO KOI11 B CLUSTER MACY1L1 $0( 1046) 
COKDAB.P 11 


15248 
15249 
iS250 


075664 
075670 
075674 


075722 


075724 
075730 
075734 
075740 
075742 


075744 
075750 
075754 
075760 
075762 


075764 


075770 
075772 
076000 
076004 
076010 
076012 


076014 


076016 
076020 
076024 
076026 
076030 


O5 -APR - 84 


012602 
012737 


177014 


170203 
012700 
170100 
174011 
016200 


16:45 


000100 
000100 
000001 


000020 


000112 


076070 
003102 
000010 


000200 


000012 


000244 


[6 


OS -APR-84 16:45 PAGE 277 


FLOATING POINT TESTS 
JSR R7,LCF SUB 


. WOR 500 
+ 18/LONG=40000,100 - TRUNCATE 


JSR aod LCF SUB 


oo 
~ 
uw 
w 
~N 


JSR R7,LCF SUB 


-WORD 7 

-WORD 10 
320/LONG= MOST NEGATIVE 

JSR R7,LCF SUB 


D 107 
WORD 110 
5 
JMP HOP 18 


300 TEST 
sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 
3:00 TEST 
3F SRC 
sRESULT 
3; TEST FPS 
sRESULT FPS 
300 TEST 
3F SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 
300 TEST 
3sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 


sGET OVER SUBROUTINE 


BS OXOKOKEKSKOX MX HX OKOXOX KOK OXOKOKSX AK HX AXMXOKEX AX SKK EK EX OX 
BOXOXOXOKOXOKOXSKHKXSKX XX AKOKX EX OX OK OXOXSX SK OXOK AK OK OK OK OX OX 


sLOCIF, ‘| OCLF 
é 
FSRC 


FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


3 
Hy RESULT 
3 
8 


Hy 
;NO TRAP CAN OCCUR 


sOXOXeXeXeXeXaeXaeXeXaeXeXeXeXeXeKXeXeXeXaXeXeXaXaXaXaXaxeXxaXxex 
gs OXOKeXeXOXOXeKeXeKeXeKXeKXeKXeXeKeXeXaeXeXeKXeXeXeX aX aX eX aX eXex 


* 

LCFSUB: MOV (SP)+,R2 
MOV #50$ , QF PVEC 
MOV ORECDST,R1 
MOV 10(R2),RO 
LOFPS RO 
MOV RO,R4 


3 

40$: LOCIF (R4),ACO 
3 

;VERIFY STATUS 


2s: STFPS R3 
MOV #200,RO 
LOFPS RO 
STD ACO,(R1) 
MOV 12(R2),RO 


; RETURN ADDRESS TO USE AS POINTER 
sREDIRECT TRAP VECTOR 
sPOINT TO RESULT AREA 
;GET TEST FPS 
sLOAD TEST FPS 
sPOINT TO TEST DATA 


s¢TEST INSTRUCTION (ACCORDING TO MODE) 
sSAVE FPS 
3SET FPP STATUS TO DOUBLE 


é 
sSAVE TEST RESULT INTO RECDST 
sGET EXPECTED STATUS 


SEQ 0276 


COKDABO KDJi1 8B 


CLUSTER 


COKDAB.P 11 OS - APR - 84 


15304 076034 
15305 076036 
15306 076040 


15308 076042 
15309 076044 
15310 076050 
076054 
15312 076060 
15313 076062 


15315 076064 


15318 076070 
15319 076072 
15320 076074 


15322 076076 
15323 076102 


15333 076102 


15337 076102 
15338 076106 
15339 076112 
15340 076120 
076122 
15342 076124 


15344 076126 
15345 076132 
15346 076136 
15347 076144 
15348 076146 
15349 076150 


076152 
15352 076156 
15353 076162 
15354 076170 
15355 076172 
15356 076174 


15358 076176 
15359 076202 


MACY11 30( 1046) 
16:45 


000004 
035370 
105000 


000014 


177762 


000264 


05 - APR - 84 


6 


16:45 PAGE 278 


FLOATING POINT TESTS 


CMP 
BEQ 
ERROR 


3$: MOV 
ADD 

4$: JSR 
TST 
BEQ 
ERROR 


5$: JMP 


MOV 
ERROR 


; 
s INSTRUCTION TRAPPED 
50$: MOV 


R2,R4 

04 ,R4 
R7,DATVFR 
COUNT 

5$ 


14(R2) 


(SP)+,RO 
_e 


S$ 


sTEST LOCID, LOCLD 


. WORD 


. WORD 


JSR 


;4/INT=-40000 
JSR 
. WORD 


R7,LCOSUB 
0,0 
0,0,0,0 


7313 
7304 


R7,LCOSUB 
0.1 
40200,0,0,0 


7757 
7740 


R?7,LCOSUB 
43600,0,0,0 


7617 
7600 


R7,L.COSUB 
40000, 1 


sVERIFY STATUS 
sBRANCH IF GOOD 
3FPP ERROR 
sBAD FPS 
sPOINT TO EXPECTED DATA 


;VERIFY DATA 
sBRANCH IF GOOD 


;—PP ERROR 
;BAD ACO 
;RETURN FROM TEST 
sSAVE PC 
sSAVE PS 
3FPP ERROR 
; INSTRUCTION WASNT SUPPOSE TO TRAP 
;CONTI 
300 TEST 
3sF SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 
300 TEST 
3F SRC 
sRESULT 
3; TEST FPS 
sRESULT FPS 
300 TEST 
3F SRC 
sRESULT 
3 TEST FPS 
sRESULT FPS 
300 TEST 
3F SRC 


SEQ 0277 


COKDABO KDJ11-B CLUSTER 
COKDAB .P 05 - APR - 


11 


076206 
076214 
076216 
076220 


076222 
076226 
076232 
076240 
076242 
076244 


076246 
076252 
076256 
076264 
076266 
076270 


076272 
076276 
076302 
076310 
076312 
076314 


076316 
076322 
076326 
076334 
076336 
076340 


076342 
076346 
076352 
076360 
076362 
076364 


076366 


MACY11 30( 1046) 
84 16:45 


000000 


000144 


000050 
176543 
122000 


000024 
125252 
125252 


000112 


000000 


000000 


126000 


05 - APR - 84 


G6 


16:45 PAGE 279 


FLOATING POINT TESTS 


. WORD 


JSR 


. WORD 


JSR 


143600,0,0,0 sRESULT 

7600 s TEST FPS 

7610 sRESULT FPS 
R7,LCDSUB 300 TEST 
40000 ,0 sF SRC 

47600,0,0,0 sRESULT 

7757 ; TEST FPS 

7740 sRESULT FPS 
R7,LCDSUB 3:00 TEST 

0,1 sF SRC 

300 3; TEST FPS 

300 sRESULT FPS 
R7,LCOSUB ;00 TEST 
-1,- 3sF SRC 

140400,0,0,0 sRESULT 

7300 3; TEST FPS 

7310 sRESULT FPS 
R7,LCOSUB 3:00 TEST 
123456,176543 sF SRC 
143661,122000,0,0 sRESULT 
200 3; TEST FPS 

210 sRESULT FPS 
R7,LCOSUB 3:00 TEST 
125252, 125252 sF SRC 
147652, 125252, 126000,0 sRESULT 
300 3; TEST FPS 

310 sRESULT FPS 

HOP 19 ;GET OVER SUBROUTINE 


; 
3 eXeXeXaXeXaeXexaeXexeXeXeXaeXeXaeXaXeXevaxeXaXaXaXeXexexaxaxax 
gOXOXOXOXeKaXeKeKeKeXaXeXeXeXeXeXeXaXaY aXeXaXeX eX aK eX eX aXe 


;LDCID, LOCLD 
‘ 


F SRC 
RESULT 


FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 


sNO TRAP CAN OCCUR 
sOKOXOXOKOXHKOXOXOXaXaKeXeXaXeXeXeKeXeKaKeXaeXeXaXexaeKexeX en 
BOXXX OKHXHXOKHKOKEXOXEKOXEKXSKOK KOK X EK OXOXOK EX EK SKEKEK SK 


SEQ 0278 


COKDABO KNDJ11 B CLUSTER 
COKDAB.P11 05 -APR -84 


076372 
076374 
076402 
076406 
076412 
076414 


076416 


012602 
012737 
012701 
016200 
170100 
010204 


177014 


076420 
076422 
076426 
076430 
076432 
076436 
076440 
076442 


076444 
076446 
076452 
076456 
076462 
076464 


076466 


170203 
012700 
170100 
174011 
016200 
020003 
001401 
104003 


010204 
062704 
004767 
005767 
001401 
104003 


000162 
076472 
076474 
076476 
076500 
076504 


012600 
012605 
104003 


000167 


076504 


076504 
076510 
076514 
076522 
076524 


005037 
004 767 
123456 
17171? 
000010 


MACY11 50( 1046) 
16:45 


076472 000244 
003102 
000014 


000200 


000016 


000004 
035004 
104376 


000020 


177762 


002776 
001140 
067012 025252 


12345667012, 25252, 17171? 


H6 


OS-APR-84 16:45 PAGE 280 

FLOATING POINT TESTS 

F 

LCDSUB: MOV (SP)+,R2 
MOV 950$ , 2eF PVEC 
MOV @RECDS’,R1 
MOV 14(R2),RO 
LOFPS RO 
MOV R2,R4 

3 

40$: LOCID (R4),ACO 

3 

;VERIFY STATUS 

2s: STFPS R3 
MOV #200 ,RO 
LOFPS RO 
STD ACO,CR1) 
MOV 16(R2),RO 
CMP RO,R3 
BEQ 3$ 
ERROR +3 

3$; MOV R2,R4 
ADD 04,R4 

4$: JSR R7,DATVER 
TST COUNT 
BEQ 5$ 
ERROR +3 

S$: JMP 20(R2) 

3 

s INSTRUCTION TRAPPED 

50$: MOV (SP )+,RO 
MOV (SP)+,R5 
ERROR +3 
JMP 5$ 

3 

HOP 19; 

3 

3 

Athi S heer edsae eters y segues 

3; TEST LDEXP 

; DOUBLE 

3 
3 
3 
8 

MLUXP:; 

3 

31/EXP=10 - AC=NEG 
CLR OF LAG 
JSR R7,LXPSUB 
. WORD 
WORD 10 


s RETURN ADDRESS TO USE AS POINTER 
sREOIRECT TRAP VECTOR 

sPOINT TO RESULT AREA 

sGET TEST FPS 

sLOAD TEST FPS 

sPOINT TO TEST DATA 


s#TEST INSTRUCTION CACCORDING TO MODE) 


sSAVE FPS 
3SET FPP STATUS TO DOUBLE 


3 
sSAVE TEST RESULT INTO RECOST 
;GET EXPECTED STATUS 
;VERIFY STATUS 
sBRANCH IF G9OD 
3FPP ERROR 
;BAD FPS 
sPOINT TO EXPECTED DATA 


;VERIFY DATA 


;BRANCH IF GOOD 
3FPP ERROR 
;BAD ACO 

sRETURN FROM TEST 


;SAVE PC 
sSAVE PS 

3FPP ERROR 

s INSTRUCTION WASNT SUPPOSE TO TRAP 
3; CONTINUE 


sNO INTERRUPTS 
300 TEST 


3b xP 


SEQ 0279 


COKDABO KDJ11 B CLUSTER 
OS -APR 


COKDAB.P11 


076526 
076534 


076670 
076672 


076674 
076700 
076704 
076712 
076714 
076716 
076724 
076726 
076730 


076732 
076740 
076744 
076752 
076754 
076756 
076764 
076766 
076770 
076772 


-84 


142056 
171717 
007757 
007750 


012737 
004767 
030131 
073031 
177600 
000131 
073031 
007740 
107744 
000012 


MACY11 
16:45 


067012 


002776 
001102 
070123 


070123 


002776 
001006 
177777 


177777 


002776 


000750 
177777 


177777 


000001 


000710 
032334 


032334 


30( 1046) 


025250 


100000 


100000 


033333 


033333 


177777 


177777 


177777 


177777 


002776 
035363 


035363 


16 


O5-APR-84 16:45 PAGE 281 
FLOATING POINT TESTS 
.WORD 142056 ,67012,25252,171717 sRESULT 
. WORD 7757 s TEST FPS 
. WORD 7750 sRESULT FPS 
32/EXP=177 - ACO=PO0S 
CLR @eOF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
e 23456, 70123, 100000,1 3ACO 
.~ WORD 177 3E xP 
. WORD 77656, 70123, 100000,1 sRESULT 
. WORD 7700 3 TEST FPS 
. WORD 7700 sRESULT FPS 
33/EXP=56 
CLR @OFLAG 3NO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
. WORD 55555 , 44444 , 33333,22222 3ACO 
-WORD 56 3ExP 
. WORD 53555 44444 , 33333,22222 ;RESULT 
.» WORD 7757 3; TEST FPS 
.» WORD 7740 sRESULT FPS 
34/EXP=-151, ACO=UV 
CLR aarF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
.~ WORD 100077, -1,-1,-2 3ACO 
WORD -155 3ExP 
. WORD 104677, -1.-1.-2 sRESULT 
. WORD 7757 3 TEST FPS 
. WORD 7750 sRESULT FPS 
35/ExP=-177 
CLR aeF LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
.~ WORD S77, 1,-l. e 3ACO 
WORD -177 3E xP 
. WORD 377,-1.-1.-e sRESULT 
. WORD 7700 3; TEST FPS 
. WORD 7700 sRESULT FPS 
36/EXP=- 200, —— 
MOV . @OF |_AG 3 INTERRUPTS 
JSR R? UXPSUB 300 TEST 
. WORD 30131, 32334, 35363, 73031 3ACO 
WORD - 200 3E xP 
. WORD 131, 32334, 35363, 7303: sRESULT 
. WORD 7740 3 TEST FPS 
. WORD 107744 sRESULT FPS 


. WORD 
3 7/E XP =LARGES 


l2 sFEC 
T NEGATIVE 


SEQ 0280 


COKDABO KDJ11 B CLUSTER MACY11 
COKDAB.P11 


076774 


077076 


077100 
077106 
077112 
077120 
077122 
077124 
077132 
077134 
077136 
077140 


077142 
077150 
077154 
077162 
077164 
077166 
077174 
077176 
077200 
077202 


077204 
077210 
077214 
077222 
077224 
077226 
677234 
077236 
077240 


077242 
077246 


OS - APR - 


012737 
004 767 


012737 
004767 
111111 
177777 
177600 
100111 
177777 
002217 
102214 
000012 


012737 
004767 


84 16:45 


000001 
000646 
000123 


000123 


002776 
000440 
177777 


177777 


002776 
000402 


30( 1046) 


002776 
000456 


000456 


002776 


002776 
065432 


065432 


177777 


177777 


ia 


05 - APR 6:45 PAGE 282 
FLOATING SPOINT TESTS 
MOV #1,@0F LAG sEXPECT INTERRUPT’, 
JSR R7,LXPSUB 300 TES! 
. 0,123,456,1 ACO 
. WORD 100000 sExP 
-WORD 40000,125,456,1 sRESULT 
-WORD 2200 s TEST FPS 
-WORD 102200 sRESULT FPS 
. WORD le sFEC 
38/EXP=-200, NEG. ACO 
MOV #1,Q90F LAG 3; INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
. WORD 111111, 100000, 100000, -1 3ACO 
. WORD -200 3;ExP 
. WORD 100111, 100000, 100000, -1 sRESULT 
. WORD 2217 ; TEST FPS 
. WORD 102214 sRESULT FPS 
-WORD 12 sFEC 
s9/EXP=-1743, FIU=0 
MOV 92,30FLAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TES? 
. WORD 123456, 12346, 12346,123 3ACcO 
. WORD -1743 sExP 
. WORD 0,0,0,0 sRESULT 
-WORD 5700 3 TEST FPS 
-WORD 5704 sRESULT FPS 
. WORD le sFEC 
s10/EXP =-16616, FID= 
MOV 2, Bef LAG sNO INTERRUPTS 
JSR R7,LXPSUB 300 TEST 
. WORD 377,123456,65432,1 3ACO 
. WORD - 16616 3E XP 
. WORD 74577,123456,65432,1 sRESULT 
. WORD 47700 3; TEST FPS 
-WORD 147700 sRESULT FPS 
WORD 12 sFEC 
sLL/EXP= 177, ACO=UNDEF INE D VAR TABLE 
CLR aeF LAG sNO INTERRUPTS 
JSR R?,LxXPSUB 300 TEST 
. WORD 100177, -1, Le 1 3ACO 
. WORD 177 sExP 
. WORD -l, be i, ~8 ;RESULT 
. WORD 7700 3; TEST FPS 
. WORD 7710 sRESULT FPS 
312/EXP= 150 ACO=PO0S 
CLR aeF LAG sNO INTERRUPT 
JSR R7,\ XPSUB 300 TEST 


SEQ 0281 


COKDABO KDJ11-8 CLUSTER MACY11 
COKDAB .P11 


077252 
077260 
077262 
077264 
077272 
077274 
077276 


077300 


077400 
077402 


077404 
077412 
077416 
077424 
077426 
077430 
077436 
077440 
077442 


077444 
077452 
077456 
077464 
077466 
077470 
077476 
077500 
077502 
077504 


077506 
077512 
077516 
077524 
077526 


05 - APR - 84 


012737 
004767 
000555 
177775 
000400 
040155 
177775 
047700 
147702 
000010 


012737 
004767 
177773 
177775 
011011 
000000 


006700 
006 706 


012737 
004767 
123456 
000200 


16:45 
000100 


000100 
000001 


000342 
177777 


177777 


000002 
000300 
177777 


177777 


000000 
000236 
177777 


000000 
000001 


000176 
000100 


000100 


002776 
000136 
023465 


30( 1046) 05-APR- 


000200 


000200 


002776 
177777 


177777 


002776 
177776 


177776 


002776 
177776 


000555 


I< #5 


84 16:45 PAGE 285 
FLOATING POINT TESTS 


-WORD 200,100,200, 300 3ACO 
. WORD 150 sExP 
. WORD 72000, 100,200, 300 sRESULT 
. WORD 7717 : TEST FPS 
WORD 7700 ;RESULT FPS 
;13/EXP=200, ACO=NEG 
MOV #1,80F LAG 
JSR R7,LXPSUB 3:00 TEST 
. WORD Ashe hat 3ACO 
. WORD 200 sExP 
. WORD 100177, -1,-1,-1 sRESULT 
. WORD 7705 ; TEST FPS 
. WORD 107716 sRESULT FPS 
. WORD 10 sFEC 
314/E¥©=400, FID 
MOV 02, 90F LAG 3; INTERRUPT 
JSR R7,LXPSUB 3:00 TEST 
. WORD $55.-1.-2,-3 3ACO 
-WORD 400 sExP 
-WORD 40155,-1,-2.-3 sRESULT 
-WORD 47700 :; TEST FPS 
. WORD 147702 sRESULT FPS 
-WORD 10 FEC 
315/ExP=11011 FIU=0 
MOV #0 ,@0F LAG sNO INTERRUPT 
JSR R7.UXPSUB 3:00 TEST 
. WORD 11011 sExP 
. WORD 0,0,0,0 sRESULT 
«WORD 6700 3; TEST FPS 
. WORD 6706 sRESULT FPS 
316/EXP=LARGEST POSITIVE 
MOV #1,@90F LAG s INTERRUPT 
JSR R7,LXPSUB :00 TEST 
. WORD 123456,100,100, 200 ACO 
. WORD 77777 3ExP 
. WORD 137656,100,100, 200 sRESULT 
. WORD 7740 3; TEST FPS 
. WORD 107752 sRESULT FPS 
. WORD 10 3sFEC 
317/FLOATING 
CLR aoF LAG 3NO INTERRUPT 
JSR R7,LXPSUB 300 TEST 
. WORD 123456,2 23465 ,555,444 3ACO 
.» WORD 50 3b xP 


SEQ 0262 
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077530 
077536 
077540 
077542 


077654 
077656 
077664 
077670 
077674 
077676 
077700 
077702 
077706 
077710 


077714 
077716 
077720 


012737 
004767 
000333 
000666 


177600 
000133 
000666 


007500 
107504 
000012 


012737 


012602 
012737 
012701 
012700 
170100 
010204 
172414 
016200 
170100 
016204 


176404 
170327 
00C000 
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023465 


000220 


077740 
003102 
000200 


000022 
000010 


000555 


002776 
000555 


000555 


002776 
000345 


000345 


000244 


lL 6 
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. WORD 152056 ,23465,555,444 sRESULT 
. WORD 7500 3; TEST FPS 
WORD 7510 sRESULT FPS 

;18/FLOATING UNDERF LOW 

MOV #1,@0F LAG s INTERRUPT 

JSR R7,LXPSUB :00 TEST 

«WORD 333,444,555, 666 3ACO 

. WORD -200 36 xP 

. WORD 133,444,555, 666 sRESULT 

. WORD 7500 ; TEST FPS 

. WORD 107504 sRESULT FPS 

. WORD 12 sFEC 
;19/FLOAT ING OVERFLOW 

MOV #1,20FLAG ; INTERRUPT 

JSR R7,LXPSUB :00 TEST 

. WORD 400 3ExP 

-WORD 40146,123,345,456 sRESULT 

. WORD 7400 3; TEST FPS 

. WORD 107402 sRESULT FPS 

. WORD 10 sFEC 
é 

JMP HOP20 sGET OVER SUBROUTINE 


gs OX OXOXaXOXeXeXeXaXaXeXOeXeXeXeXeXeXaXOXeKXeXaXeXeXeXeXeXeX ex 
3 OXeXeXeXeXeXaeXeXaXaXeXaeXeXeXeXeXaXaXexeXeXareXeXeXexexeXex 


;LDEXxP 

3 Aco 

8 EXPONENT 

3 RESULT 

F FPS BEFORE EXECUTION 
: FPS AFTER EXECUTION 
8 (FEC) 


° 
gOXaXeXeXeXaXeXaXexeXeXeXeXeXeXeXeXaXaeXeXeXeXeXeXeXaXeXeXex 
sOXeXeXeKXeXaeKeXeXeXeXaX eX eX eXeKeKXeKeKXeKeXeXaeXeXeXeXaXeXeXex 


. 
LXPSUB: MOV (SP)+,R2 ; RETURN ADDRESS TO USE AS POINTER 
MOV #50$ ,aeF PVEC sREDIRECT TRAP VECTOR 
MOV #RECDST,R1 sPOINT TO RESULT AREA 
MOV #200 ,RO ;SET FPS TO DOUBLE 
LOFPS = RO 3 
MOV R2,R4 sPOINT TO ACO DATA 
LOD (R4),ACO sLOAD ACO 
MOV 22(R2),RO 3GET TEST FPS 
LOFPS RO sLOAD TEST FPS 
MOV 10(R2),R4 sPOINT TO TEST DATA 
é 
40$; LDEXP R4,ACO s*TEST INSTRUCTION (ACCORDING 'O MODE) 
1$;: STST (PC)-+ sWAIT FOR POSSIBLE FPA TRAP, 


-WORD O ;oTORE STATUS HERE 


SEQ 028% 
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077722 
077730 
077732 
077734 
077740 
077746 
077750 


077752 


077770 


077772 
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000001 


000032 


000001 


000014 


077716 


000200 


000024 


000012 
033432 
103024 


002776 
000026 
003062 
000026 


000030 


002776 


002776 


Mé 
O5-APR-84 16:45 PAGE 285 
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: 
sTINSTRUCT ION DIONT TRAP 


#1,90F:.AG 
BEQ es 
ERROR +3 
JMP es 
} INSTRUCTION TRAPPED 
50$: BIT #1,30FL4G 
BNE 513 
ERROR 3 
JMP es 
5158: MOV (SP )+,R4 
TST (SP )- 
CMP #1$,R4 
BEQ 2s 
ERROR 3 


;VERIFY A NO TRAP CONDITION 
;BRANCH IF GOOD 
3FPP ERROR 
s INSTRUCTION SHOULD HAVE TRAPPED 
sREJOIN CODE 


sSEE IF EXPECTING A TRAP 
s;BRANCH IF EXPECTING A TRAP 
3;FPP ERROR 
s INSTRUCTION WASNT SUPPOSE TO TRAP 
sREJOIN CODE 
sSEE IF PC = INSTRUCTION 
sCLEAN UP STACK 


a 

;BRANCH IF GOOD COMPARE 
3FPP ERROR 
3PC WAS INCORRECT 


° 
;COMMON CODE FOR TRAP AND NO TRAP 


;VERIFY STATUS 


2s: STFPS RS 
MOV #200 ,RO 
LOFPS RO 
STO ACO,(R1) 
MOV 24(R2),RO 
CMP 0,R3 
BEQ 3$ 
ERROR 3 
3$: MOV R2,R4 
ADD #12, R4 
4$: JSR R7, DATVER 
TST Cc 
BEQ S$ 
ERROR +3 
S$: TST aeF LAG 
BNE 7$ 
JMP 26(R2) 
;VERIFY FEC 
7$: MOV #RECFEC,R4 
STsT (R4) 
CMP (R4),26(R2) 
BEQ 8$ 
ERROR 3 
8$ JMP 30(R2) 
rH 
HOP20; 


sSAVE FPS 
3SETUP FPS 
3FPS=200 
sGET RESULT 
;GET EXPECTED STATUS 
;VERIFY STATUS 
;BRANCH IF GOOD 
;—PP ERROR 


3;BAD FPS 
sPOINT TO EXPECTED DATA 
;VERIFY DATA 


s;BRANCH IF GOOD 
3FPP ERROR 


;BAD ACO : 
;SEE IF NEED TO CHECK FEC 
;BRANCH IF NEED TO CHECK 
;RETURN FROM TEST 


sPOINT TO FEC AREA 
;SAVE FEC 
;VERIFY FEC FOR OVERFLOW 
;BRANCH IF GOOD 
3;FPP — 
BAD FEC 
sRETURN FROM TEST 


SEQ 0284 
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84 16 


002776 
000610 
000000 


177777 


002776 
000560 
177777 


002776 
000500 
177777 
000000 


002776 
000450 
075757 
173757 


002776 
000420 
000000 


000000 


177777 


000001 


157737 
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; iTEST STCDI, STCOL 


MSCD: 
3 
31/7ACO=0, INT 
CLR @eF LAG sNO INTERRUPTS 
JSR R7,SCOSUB ;00 TEST 
WORD 0177,0,0,0 3ACO 
. WORD 0,-1 sRESULT 
. WORD 7640 ; TEST FPS 
. WORD 7644 sRESULT FPS 
:2/ACO=-0, LONG 
CLR OF LAG 3; INTERRUPT 
JSR R7,SCOSUB ;00 TEST 
. 100177,-1,-1,-1 3ACO 
. WORD 0,0 ;RESULT 
WORD 7700 3; TEST FPS 
. WORD 7704 sRESULT FPS 
33/EXP=100, LONG 
CLR OF LAG :NO INTERRUPT 
JSR R7,SCOSUB 300 TEST 
. WORD 20000 ,0,0,0 3ACO 
. WORD 0,0 sRESULT 
. WORD 300 ; TEST FPS 
. WORD 304 sRESULT FPS 
147EXP=200, BAISED 0, INT, ROUND 
CLR OF LAG ; INTERRUPT 
JSR R7,SCOSUB 300 TEST 
. WORD 140177, L7T7TT 3,4 3ACO 
. WORD 0,0 ;RESULT 
. WORD 7700 ; TEST FPS 
. WORD 7704 sRESULT FPS 
357LONG 
CLR aerF LAG 3; INTERRUPT 
JSR R7,SCDSUB 300 TEST 
. WORD 47667, 78757,157737, 167773 3ACO 
. WORD Pore tk Pare? sRESULT 
. WORD 717 3; TEST FPS 
. WORD 7700 sRESULT FPS 
36/LONG, pe 20032 
CLR @eFLAG 3NO INTERRUPT 
JSR R7,SCOSUB 300 TEST ’ 
. WORD 46400,0,0.0 3ACO 
. WORD 1000,0 sRESULT 
» WORD 7700 3 TEST FPS 


SEQ 0285 


B/ 
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15808 1003812 007700 .wORD 7700 sRESULT FPS 

15809 37/LONG, EXP>2ee32 

15810 100314 012737 O00001 907776 MOV 01, 80F LAG s INTERRUPT 
15811 100322 004767 000366 JSR R7,SCO>5U8 300 TEST 
15812 100326 077607 000000 (00000 “WORD 77607,0,0,0 sACO 
15813 100334 009000 

15814 100336 000000 000000 .WORD 0,0 sRPESULT 

158iS 100342 007700 .WORD 7700 s TEST FPS 

15816 100344 107705 .WORD 107705 sRESULT FPS 

15817 38/INT, EXP +20015 

15818 100346 005037 002776 CLR BOF LAG sNO INTERRUPTS 
15819 100352 004767 000336 JSR R7,SCOSUB 300 TEST 
15820 100356 043200 000000 000000 “WORD 43200,0,0,0 sACO 
15821 100364 000000 

15822 100366 010000 177777 -WORD 10000, -1 sRESULT 
15823 100372 007600 .WORD 7600 s TEST FPS 

15824 100374 007600 .WORD 7600 sRESULT FPS 

15825 39/INT, EXP>20015 

15826 100376 012737 000001 002776 MOV 01, 80F LAG ; INTERRUPT 
15827 100404 004767 000304 JSR R7,SCOSUB 300 TEST 
15828 100410 077777 177777 177777 \WORD §-77777,-1,-1,-1 sACO 

15829 100416 177777 

15830 100420 000000 177777 -WORD 0,-1 sRESULT 

15@31 100424 007600 -WORD 7600 3; TEST FPS 

15832 100426 107605 -WORD 107605 sRESULT FPS 

15833 s10/INT, EXP>200e15, FID 

15834 100430 012737 000000 002776 MOV 00, QOF LAG sNO INTERRUPT 
15835 100436 004767 000252 JSR R7,SCOSUB 300 TEST 
15830 100442 043300 000000 000000 -WORD 43300,0,0,0 sACO 
15837 100450 000000 

15838 100452 000000 014000 -WORD 0,14000 sRESULT 

15839 100456 047700 «WORD 47700 3s TEST FPS 

15840 100460 047700 .WORD 47700 sRESULT FPS 

15841 sL1/INT, EXP>20015, FIC*0 

15842 100462 012737 000000 002776 MOV 00 , BOF LAG 3NO iNTERRUPT 
15843 100470 004767 000220 JSR R7,SCOSUB 300 TEST 
15844 100474 143300 177777 177777 “WORD 148300,-1,-1, 2 3ACO 
15845 100502 177777 

15846 100504 177777 163741 -WORD -1,163741 sRESULT 
15847 100510 007300 .WORD 7300 3s TEST FPS 

15848 100512 007310 -WORD 7310 sRESULT FRS 

15849 312/7LONG, EXP>20e32, FID 

15850 100514 012737 000002 002776 MOV 02, Q0F LAG ; INTERRUPT 
15851 100522 004767 000166 JSR R7,SCOSU8 300 TEST 
15852 100526 050100 000000 000000 “WORD 50100,0,0,0 ACO 
15853 100534 000000 

15854 100536 000000 000000 -WORD 0,0 sRESULT 

5855 100542 047700 .WORD 47700 s TEST FPS 

156756 100544 147705 .WORD 147705 sRESULT FPS 

15857 313/LONG, EXP>200e382, FICO 

15858 100546 012737 000000 007776 MOV 00, @0F LAG sNO INTERRUPT 
15859 100554 004767 000134 JSR R7,SCOSUB 300 TEST 
15860 100560 050377 177777 #177777 “WORD 50877, 1, 1, 1 3ACO 
15861 100566 177777 

15862 100570 000000 000000 .WORD 0,0 sRESAT 


1584% 100574 0074500 WORD 7300 s TEST FP 
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158604 
15865 
15866 
1586" 
15868 
15869 
15870 


1005 76 


100714 
100716 
100724 
100730 
100734 
100740 
100744 
100746 
100750 
100752 
100756 


100760 
100762 


007505 


005037 
004 767 


100200 
177777 


000000 
007757 
007744 


005037 
004 767 
037700 
177776 
000000 
007600 
007604 


005037 
004 767 
004377 
177777 
000000 


007600 
007604 


000167 


012602 
012737 
012701 
012711 
012741 
012700 
170100 
010204 
172414 
016200 
170100 


175411 
170327 
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2776 
000104 
177777 


000000 


002776 
000054 
177777 
177777 


002776 
000024 
177777 


177777 


177777 


177777 


000244 
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. WORD 7305 sRESULT FPS 
314/LONG, EXP<0 

CLR @OFLAG sNO INTERRUPTS 

JSR R7,SCO5UB 300 TEST 

. WORD 100200, -1,-1,-1l sACO 

«WORD 0,0 sRESULT 

. WORD 7757 s TEST FPS 

. WORD 7744 sRESULT FPS 
s15/INT, EXP<O 

CLR @OFLAG sNO INTERRUPTS 

JSR R7,SCOSUB 300 TEST 

. WORD 37700, -1,. Le 2 sACO 

«WORD O,-1 sRESULT 

. WORD 7600 3 TEST FPS 

° 7604 sRESULT FPS 
316/INT, EXP*10 

CLR @eFLAG sNO INTERRUPTS 

JSR R7,SCOSUB 300 TEST 

-WORD 4377,-1,-1,-1 3AcOo 

«WORD O,-1 sRESULT 

WORD 7600 3; TEST FPS 

. WORD 7604 sRESULT FPS 
$ 

HOP 21 3sGET OVER SUBROUTINE 


p OX OXON OK OX OX OX AKOXNONOXOKAX OX OK OKOXOKOX OXON eX eXeXeXekexexex 
geoXeXeXeXeXeXeXeXaeXeXeXaXeXeXexeXeXeXeXeXeXaekeKexexeXexXaXex 
sSTCOI, STCOL, STCFI, STCFL 


3 aco 

FY RESULT 

3 FPS BEFORE EXECUTION 
3 FPS AFTER EXECUTION 
3 (FEC) 


3 

3 TRAP ON CONVERSION FAILURE 
pOXeXeXeXeXeXeXeXaeXeXeXeXeKeXeXeXeXeKeXeXaXeXeXexeXaXeXeXex 
geXeXaXeXeXeXeXeXeXeXeXeXeXeXeXeKxeXeKeXeXeXaeXeXeXeXexeXexex 


$ 
SCDSUB: MOV (SP)+,R2 ; RETURN ADDRESS TO USE AS POINTER 
MOV 0508 ,@orPVEC sREDIRECT TRAP VECTOR 
MOV @RECDST+2,R1 sPOINT TO RESULT AREA 
MOV @ 1,(RL) sPRELOAD RECEIVE DATA BUFFER 
MOV #-1,-CRL) 3 
MOV 200 ,RO 3SET FPS TO DOUBLE 
LOFPS) = RO : 
MOV R2,R4 sPOINT TO ACO DATA 
LOO (R4),ACO LOAD ACO 
MOV 14(R2),RO 3GET TEST FPS 
LOFPS = RO sLOAD TEST FPS 
b 
40%; STCOI ACO,(R1) seTEST INSTRUCTIONC ACCORDING TO MODE 
1$: 51st (PC)+ WALT FOR POSSTBLE FPA TRAP, 


SEQ 0287 


D/ 
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15920 100764 000000 .WORD 0 sSTORE STATUS HERE. 
os : 
15922 
15923 t INSTRUCTION DIONT TRAP 
15924 100766 032737 000001 002776 BIT 01, 80F LAG sVERIFY A NO TRAP CONDITION 
15925 100774 001420 BEQ 23 sBRANCH IF GOOD 
15926 100776 104003 ERRCR +3 sFPP ERROR 
15927 s INSTRUCTION SHOULD HAVE TRAPPED 
15928 101000 000167 000032 UMP 23 sREJOIN CODE 
15930 s INSTRUCTION TRAPPED 
15931 101004 032737 000001 002776 50%: BIT 91, 90F LAG 3SEE IF EXPECTING A TRAP 
15932 101012 001003 BNE 518 ;BRANCH IF EXPECTING A TRAP 
15933 101014 104003 ERROR +3 ;FPP ERROR 
15934 s INSTRUCTION WASNT SUPPOSE TO TRAP 
15935 101016 000167 000014 JMP 23 sREJOIN CODE 
15936 101022 012604 Sis: MOV (SP)+,R4 3SEE IF PC = INSTRUCTION 
15927 101024 005726 TST (SP)- sCLEAN UP STACK 
15938 101026 022704 100762 CMP 018,R4 ; 
15939 101032 001401 BEQ 2s sBRANCH IF GOOD COMPARE 
15940 101034 104003 ERROR +3 ;FPP ERROR 
15941 sPC WAS INCORRECT 
15942 3 
15943 s;COMMON CODE FOR TRAP AND NO TRAP 
15944 ;VERIFY STATUS 
15945 101036 170203 23: STFPS R3 sSAVE FPS 
15946 101040 016200 000016 MOV 16(R2),RO 3GET EXPECTED STATUS 
15947 101044 020003 CMP RO,R3 sVERIFY STATUS 
15948 101046 001401 BEQ 3$ ;BRANCH IF GOOD 
15949 101050 104003 ERROR +3 ;FPP ERROR 
15950 ;BAD FPS 
15951 101052 010204 3$: MOV R2,R4 sPOINT TO EXPECTED DATA 
15952 101054 062704 000010 ADD 210,R4 
15953 101060 004767 032360 43: JSR R7,DATVFR sVERIFY DATA 
15954 101064 005767 101770 TST COUNT 
15955 101070 001401 BEQ S$ ;BRANCH IF GOOD 
15956 101072 104003 ERROR +3 ;FPP ERROR 
15957 3BAD ACO 
15958 101074 005737 002776 S$: TST @OFLAG 3SEE IF NEED TO CHECK FEC 
15959 101100 001002 BNE 7$ 3BRANCH IF NEED TO CHECK 
15960 101102 000162 000020 JMP 20(R2) sRETURN FROM TEST 
15961 ;VERIFY FEC 
15962 101106 012704 003062 7$; MOV ORECFEC,R4 sPOINT TO FEC AREA 
15963 101112 170314 STST (R4) ;SAVE FEC 
15964 101114 021427 000006 CMP (74), 06 ;VERIFY FEC FOR OVERFLOW 
15965 101120 001401 BEG BS sBRANCH IF GOOD 
15966 101122 104003 ERROR «8 ;FPP ERROR 
15967 3BAD FEC 
15968 101124 000162 000020 8$: JMP 20(R?) ;RETURN FROM TEST 
15970 101130 HOP21: 
15971 3 
15972 3 
15973 
SO cee ee 0 | il hs see tele icemdctevesceah 


15975 iTEST STCFI, STCFL 
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15976 
15977 
15978 
15979 
15980 
15981 
15982 
15983 
15984 


16931 


101130 


101130 
101134 
101140 
101146 
101150 
101154 
101156 


101160 
101164 
101170 
101176 
101200 
101204 
101206 


101210 
101216 
101222 
101230 
101232 
101236 
101240 


101242 


101270 


101272 


101272 
101276 


004767 


004767 
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002776 
177554 
052525 


102525 


002776 
177524 
177777 


177777 


000001 
177472 
177777 


000000 


002776 
177442 
000000 


177777 


000154 


30( 1046) 


177777 


177777 


002776 


177777 


177777 


020000 000000 000000 


E / 
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MSCF; 


é 
s1/LONG EXP =30 
CLR 


@OFLAG 
JSR R7,SCOSUB 
«WORD 44541,52525,-1, 
«WORD 3,102525 
. WORD 7517 
. WORD 7500 
3s2/7INT, EXP<O 
CLR @oF LAG 
JSR R7,SCDSUF : 
. WORD 2300, -1,.-1,.-1l 
«WORD O,-1 
-WORD 7400 
. WORD 7404 
33/LONG, EXP 
MOV 1,290FLAG 
JSR R7,SCOSUB 
. WORD 70000, -1,-1,-1 
-WORD 0,0 
. WORD 7540 
. WORD 107545 
34/INT,ExP=5, FIC*0O, FID0=1 
CLR OF LAG 
JSR R7,SCOSUB 
-WORD 52000,0,-1,-1 
-WORD O,-1 
-WORD 47000 
«WORD 47005 
6 
é 
‘ 
3 ---7 = _—-s2e ee = = 
sTEST STEXP 
3 
; 
‘ 
3 
MSxXP; 
3 
31/ExP-=100 
JSR R7,SXPSUB 
WORD 20000,0,0,0 


3NO INTERRUPTS 
300 TEST 
l 3ACO 


sRESULT 
3 TEST FPS 
sRESULT FPS 


3NO INTERRUPTS 
:00 TEST 
sACO 


sRESULT 
3 TEST FPS 
sRESULT FPS 


3; INTERRUPT 
300 TEST 
3;ACO 


sRESULT 
3 TEST FPS 
sRESULT FPS 


sNO INTERRUPTS 
300 TEST 
sACO 


sRESULT 


3; TEST FPS 
sRESULT FPS 


300 TEST 
3ACO 


SEQ 0289 
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16087 


000000 
101306 i77700 
101310 007740 
101312 007750 


101314 004767 
101320 140377 
101326 000000 
101330 000001 
101332 007500 
101334 007500 


101336 004767 


101402 004767 
101406 040000 
101414 000000 
101416 000000 
101420 007700 
101422 007704 


101424 004767 
101430 000177 
101436 177777 
101440 177600 
101442 000000 
101444 000010 


101446 000167 


101452 012602 
101454 012737 


CLUSTER 
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177777 


177777 «#177777 


000000 177777 


000044 


000022 
Riviere | 6UTTtrT 


000104 


101544 000244 


F/ 
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. WORD -100 sRESULT 

» WORD 7740 3; TEST FPS 

. WORD 7750 sRESULT FPS 
32/EXP=201 FLOAT, NEG 

JSR R7,SXPSUB 300 TEST 

~ WORD 140377,-1,-1,0 3ACO 

. WORD 1 sRESULT 

. WORD 7500 ; TEST FPS 

. WORD 7500 sRESULT FPS 
33/EXP=-177 

JSR R7,SXPSUB 3:00 TEST 

. WORD 177,-1,-1,-1 ACO 

. WORD 177600 sRESULT 

. WORD 7700 3; TEST FPS 

° D 7710 sRESULT FPS 
34/ExP=-100 

JSR R7,SXPSUB 300 TEST 

.WORD 20000,0,-1,-1 3ACO 

. WORD -100 sRESULT 

«WORD 40200 ; TEST FPS 

wORD 40210 sRESULT FPS 
35/EXP=200 

JSR R7,SAPSUB 3:00 TEST 

.WORD 40000,0,.0,0 3ACO 

«WORD 0O sRESULT 

. WORD 7700 3 TEST FPS 

WORD 7704 sRESULT FPS 
36/EXP=0 

JSR R7,SXPSUB 300 TEST 

~ WORD 177,-1.-1.-1 3sACO 

.- WORD 177600 sRESULT 

. WORD .¢) 3; TEST FPS 

WORD 10 sRESULT FPS 


:GET OVER SUBROUTINE 
goXeXaXeXeXaXeXeXeXeXaeXeXeXeXaXeXeXxaeXeXeXaXaXaeXeXaXexexeXeX 
5 aXOX XOX OXOX OX HXOKSX AX HKSKSKXEXOX SK SKOXOKAXEXHKEXSXEXAX EX OX 


3STEXP 

H ACO 

: EXPONENT RESULT 

3 FPS BEFORE EXECUTION 
; FPS AFTER EXECUTION 


; 

3NO TRAPS CAN OCCUR 

5 OXOXHXOXOKOKAXKOKEKAKSKX SKK OX HXEKOKEKOKOKSX HK EK AX OX OK OKAXEX 
gOXeKeKeXaeXeXeXeXaXaeXaeXeXaXaXeXeKaXeXeXeXeXeXeKeXaXeXaxeXxex 


3 
SXPSUB: MOV (SP)+,R2 
MOV #50$ ,@0F PVEC 


; RETURN ADDRESS TO USE AS POINTER 
sREOIRECT TRAP VECTOR 


SEQ 0290 


G/ 


COKDABO KDJ11-B8 CLUSTER MACY11 30(1046) 05-APR-84 16:45 PAGE 292 
COKDAB.P11 05-APR-84 16:45 FLOATING POINT TESTS 
16088 101462 012701 003102 MOV MRECDST,R1 sPOINT TO RESULT AREA 
16089 101466 012700 000200 MOV 2200 ,RO sSET FPS TO DOUBLE 
16090 101472 170100 LOFPS RO ; 
16091 101474 010204 MOV R2,R4 sPOINT TO ACO DATA 
16092 101476 172414 LOD (R4),ACO ;LOAD ACO 
16093 101500 016200 000012 MOV 12(R2),RO 3GET TEST FPS 
peers 101504 170100 LOFPS RO 3LOAD TEST FPS 
16 3 
16096 101506 175011 40$: STEXP ACO,(R1) s*TEST INSTRUCTIONCACCORDING TO MODE) 
16097 3 
16098 ;VERIFY STATUS 
16099 101510 170203 23: STFPS RB 3;SAVE FPS 
16100 101512 016200 000014 MOV 14(R2),RO 3;GET EXPECTED STATUS 
16101 101516 020003 CMP RO,R3 ;VERIFY STATUS 
16102 101520 001401 BEQ 3$ ;BRANCH IF GOOD 
16103 101522 104003 ERROR +3 ;FPP ERROR 
16104 3BAD FPS 
16105 101524 016204 000010 3$: MOV 10(R2),R4 sPOINT TO EXPECTED EXPONENT 
16106 101530 020437 003102 CMP R4,QORECDST ;VERIFY EXPONENT 
16107 101534 001401 BEQ 53 ;BRANCH IF GOOD 
16108 101536 104003 ERROR +3 3FPP ERROR 
16109 3BAD ACO 
46110 101540 000162 000016 ate JMP 16(R2) ;RETURN FROM TEST 
6111 
16112 * INSTRUCTION TRAPPED 
16113 101544 012600 50$: MOV (SP )+,RO ;SAVE PC 
16114 101546 012605 MOV (SP)+,R5 3;SAVE OLD PS 
16115 101550 104003 ERROR +3 3FPP ERROR 
1611le ;WILD TRAP DURING STEXP 
16117 101552 000167 177762 JMP 5s s;REJOIN CODE 
16118 ; 
16119 
16120 101556 HOP 22: 
16121 
16122 
16123 .ENABL AMA 
16124 .SBTTL TEST - CHECK REGISTER ACCESS 
16125 ;CHECK REGISTER ACCESS - THIS TEST wILi VERIFY EACH OF THE THREE 
16126 ;CACHE MEMORY SYSTEM REGISTERS CAN BE ACCESSED WITHOUT A TRAP TO 
16127 sLOCATION 4(NON-EXISTANT ADDRESS TRAP) OCCURRING. THE REGISTERS TO 
16128 ;BE TESTED ARE: 
16129 ; CACHE CONTROL 17777746 
16130 MEMORY SYSTEM ERROR 17777744 
16131 HIT/MISS 17777752 
+t rEACH REGISTER WILL BE ACCESSED WITH A WRITE CYCLE. 
16134 SBGNTST 
16135 ;SAVE CONTENT OF LOCATION 4 
16136 3;LET LOCATION 4 POINT TO ERROR ROUTINE 
16137 s INITIALIZE R TO TOP OF ADDRESS TABLE 
16138 300 UNTIL FOR ALL REGISTERS 
16139 wv TEST REGISTER UNDER TEST 
16140 :. IF TIMEOUT DID HAPPEN 
16141 “" ERROR 
16142 3. ENDIF 
16143 ;ENDDO 


SEQ 0291 


COKDABO KDJ11 B CLUSTER MACY11 50( 1046) 


COKDAB.P 11 


10144 
16145 
16146 
16147 
16148 
16149 
16150 
16151 
16152 
16153 
16154 
16155 
16156 
16157 
16158 
16159 
16160 


101676 


101700 
101700 
101 702 


OS -APR 84 


16:45 


133124 
000004 
101700 
177746 


177746 
177744 
177744 
177752 


177752 
002762 


000004 
002762 
000004 
001122 


001122 


05 - APR -84 
TEST 


H/ 


16:45 PAGE 2 


95 
- CHECK REGISTER ACCESS 


oT OF LOCATION 4 


sExIT 


3 
sADDRESS TABLE: 
8 
3 


sENOTST 
sERROR ROUTINE: 
; 


17777746 
17777744 
17777752 


SET TIMEOUT FLAG 


RE TURN 


FF FHSHAHRAHHSASEHASSEESASAEEEEHEHESEEHEEESEEEEHESEEEEEEEEEEEAEEHEHEOEEESD 


TSTe: SCOPE 


1$: 


2s: 


38; 


4$; 


ERROUT: 


2s 
CCR, $BDADR 
+130 


OMSER, $BDADR 
+130 


R1 
HITMIS 
R1 


4$ 
®HITMIS, $BDADR 


+130 
SLOCOO, a4 
TST3 


R1 


sSAVE CONTENTS OF VECTOR 4 

sLET VECTOR 4 POINT TO ERROR ROUTINE 
sCLEAR TIMEOUT FLAG 

sREAD REGISTER UNDER TEST 

3 TIMEOUT? 


sSTORE LOCATION 
sTIMEOUT ACCESING CCR 
sCLEAR TIMOUT FLAG 
sREAD MSER 

sTIMEOUT ? 


sSTORE LOCATION 

s TIMEOUT ACCESSING MSER 
sCLEAR TIMEOUT FLAG 
sACCESS HIT/MISS 

s TIMEOUT? 


:STORE LOCATION 
sTIMEOUT ACCESSING HIT/MISS 
sRESTORE VECTOR 4 

3:GO TO NEXT TEST 


sFLAG TIMEOUT 


SEQ 0292 


COKDABO KN11 6 
COKDABR.P 11 


1¢186 
1¢187 
16188 
16189 
16190 
16191 
16192 
16193 
16194 
16195 
10196 
16197 
16198 
16199 
16200 
16201 
16202 
16203 
16204 
16205 
16206 
16207 
16208 
16209 
16210 


101704 
101706 
101712 
101716 
101722 
101726 
101730 
101734 
101736 
101742 
101744 
101746 
101750 


CLUSTER MACY11 30( 1046) 
R-84 16:45 


O05 - AP 


000001 


177746 
177746 
177746 
177746 


174400 


05 -APR 16:45 PAGE 294 
TEST ter REGISTER BIT TEST SEG 02%% 


-SBTTL TEST - CCR REGISTER BIT TEST 

:CCR REGISTER BIT TEST - THIS TEST WILL VERIFY THAT EACH READ/WRITE BIT OF 
3; THE CACHE CONTROL REGISTER CAN BE SET AND CLEARED INDIVIDUALL+ AND THAT 
sBITS 15 - 11 AND BIT & ARE ALWAYS READ AS ZEROS. 


3 

;BGNTST 

s INITIALIZE GOOD DATA TO 41 

;CLEAR CCR 

300 UNTIL ALL BITS TESTED 

Bie WRITE GOOD DATA TO CCR 

is READ CCR 

es d CCR NOT EQUAL TO GOOD DATA THEN 

“S IF CCR EQUAL TO ZERO THEN 

bs 2 : IF GOOD DATA NOT EQUAL TO BIT 15 11 OR BIT 8 THEN 
Se * @ ERROR IN READ/WRITE BITS OF CCR 
3. A ‘ ENDIF 

B< ENDIF 

is UPDATE TO NEXT BIT 

:ENDDO 

sENDTST 


FF SSSSASHSSEHSASSEHSHSSHSHESESEHESSEHESHEHEEEHEESEESEEESESEESHESESEEOEOEEEEE 


TST3: SCOPE 


MOV #1, R1 sINITIALIZE GOOD DATA 10 41 

CLR CCR sCLEAR CCR 
1$: MOV Rl, CCR sWRITE GOOD DATA TO CCR 

st cm R1 ‘Te — NOT EQUAL GOCD DATA 

$ 

TST CCR ue CCR EQUAL TO ZERO 

BNE es THEN 

BIT #174400,R1 VIF GOOD DATA NE TO BIT 15-11 OR BIT 8 

BNE 3$ 3 THEN 
2s: ERROR +4 sERROR IN READ/WRITE BITS OF CCR 
3%: ROL R1 sUPDATE TO NEXT BIT 

Bcc 1$ 300 UNTIL ALL BITS TESTED 


J/ 


COKDABO KDJ11-B8 CLUSTER MACY11 30(1046) O5-APR-84 16:45 PAGE 295 


COKDAB.P 11 


lo2e3 
loeesa 
16225 
16226 
16227 
16228 
16229 

6230 
16231 
16232 
16233 
16234 
16235 
16236 


05 -APR-84 16:45 


TEST - FORCE MISS TEST SEG 


-SBTTL TEST ~- FORCE MISS TEST 

sFORCE MISS TEST - THIS TEST WILL VERIFY THAT ALL REFERENCES MADE 
sWITH EITHER BIT<3> OR BIT<2> OF THE CCR SET CAUSE A CACHE MISS AND 
sLEAVE THE CACHE ENTRY UNCHANGED. FIRST WRITE A TEST ADDRESS WITH 
:BITS<3:2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN 
sINTO THE CACHE. THEN SET BIT<2> AND REWRITE THE SAME ADDRESS WITH 
sNEW DATA, NEXT CLEAR BITS<3:2> AND READ THE TEST ADDRESS, THE DATA 
sSHOULD EQUAL TO PATTERN 1. FINALLY READ THE TEST ADDRESS WITH BIT<3> 
;SET, THE DATA SHOULD EQUAL PATTERN 2. A LAST WRITE MUST BE DONE WITH 
;BOTH FORCE BITS CLEARED BECAUSE THE CACHE AND MAIN MEMORY HAVE 
sDIFFERENT DATA, 

5 


;BGNTST 

sWRITE TEST ADDRESS WITH PATTERN 1 
3SET CCR BITS<3:2> = 0,1 

sWRITE TEST ADDRESS wITH PATTERN 2 
;CLEAR CCR BIT<3> 

FREAD TEST ADDRESS 

;SAVE HIT/MISS REGISTER DATA 
sCOMPARE RECEIVED DATA TO PATTERN 1 


;IF DATA NOT EQUAL THEN 

3- IF DATA EQUAL TO PATTERN 2 THEN 

3. e IF HIT THEN 

8. . p se ERROR FORCE MISS WRITES TO CACHE 

8. ° L 

8. ° ‘ IF PARITY ERROR INDICATORS EQUAL O THEN 

Se ‘ ~ ; - ERROR FROCE MISS INVALIDATES CACHE 
3. e . L 

Se . ° ‘ IF ALL PARITY INDICATORS SET THEN 


° — ERROR PARITY ABORT AFTER FORCE MISS 
- F 
IF TAG PARITY ERROR THEN 
ERROR TAG PARIT1 ERROR AFTER FORCE MISS 


Se ‘ ‘ ELSE 

Be . 2 P IF BO AND 61 ERROR THEN 

“- ‘ . . ‘ ERROR DATA PARITY ERROR AFTER FORCE MI 
Be . ‘ 3 ENOIF 

Be ‘ ‘ P IF BO PARITY ERROR THEN 

Se ‘ ‘ . . ERROR LOW BYTE PARIT: ERROR 
re ‘ ‘ ‘ ‘ ENDIF 

Ss ‘ . ‘ ‘ IF Bl PARITY ERROR THEN 

hs . ‘ ‘ i , ERROR HIGH BYTE PARITY ERROR 
Ss ‘ " . : ENDIF 

be * . ‘ ENDIF 

Re ‘ , ENDIF 

be . ENDIF 

hie ELSE 

Be " ERROR IN DATA PATH 

Be ENDIF 

sENDIF 


iSET CCR<3:2> = 1,0 

sREAD TEST ADDRESS 

sSAVE HIT/MISS REGISTER DATA 
sCOMPARE RECEIVED DATA TO PATTERN .’ 
3IF DATA NOT EQUAL THEN 


$ 


5 


0294 


COKDABO KDJL1 Rs te yond! 30( 1046) B+ APR - 84 


COKDAB.P11 


loe 79 
16280 
16281 
16282 
16283 
19284 
16285 
16286 
16287 
16288 
16289 
16290 
16291 
16292 
16293 
16294 
16295 
16296 
16297 


102160 


APR 84 16:4 


032703 
001401 


177777 
000002 


100340 


100340 


177477 
000300 


000100 


002762 
000114 


177746 
003122 
177746 
001124 
177520 


177520 


a» 
s ENDIF 


sCLEAR CCR<3;:2> 


16:45 


I / 


PAGE 296 


FORCE MISS TEST 


ELSE 
ENDIF 


HIT 
ELSE 
ENDIF 


ERROR IN DATA PATH 


sWRITE TEST ADDRESS 


sENDTST 


If or oy 4 TO PATTERN 1 THEN 
ERROR FORCE MISS READS FROM CACHE 
ERROR FORCE MISS READS FROM CACHE AND MISS 


FF ASSSSSHSHASHSSHESESHSEHSEEEESH + SESESEESESEESEEEHESEESESEOEHESEEEEEE 


TST4: 


100$: 


101$: 


102$: 


103$: 


104%; 


SCOPE 


a0114, 


oBT'02, CCR 


oa te 


#200 


CCR 
#177777, $GDDAT 


R3, R4 
#300, "Ra 


SLOCOO 
OF MPARR 80114 


sSAVE CONTENTS OF VECTOR 114 

sSETUP PARITY VECTOR TO POINT TO HANDLER 
sCLEAR MSER SAVE LOCATION 

sWRITE TEST LOCATION WITH PATTERN 1 
sSET CCR BITS<3:2> = 0,1 

sWRITE TEST LOCATION WITH PATTERN 2 
sCLEAR CCR BIT 3 AND SET PARITY? ABORTS 
sSAVE DATA IN MEMORY 

sOISABLE HALT ON BREAK 

sREAD TEST ADDRESS 

sSAVE HIT/MISS DATA 

sENABLE HALT ON BREAK 

sCOMPARE RECEIVED DATA TO PATTERN 1 
3IF DATAS NOT EQUAL THEN 

:IF DATA EQUAL TO PATTERN 2 


; THE 

sFORCE MISS WRITES TO CACHE 
sELSE 

— INDICATORS EQUAL O 


Ary MISS WRITE INVALIDATES CACHE 
: 

;IF ALL PARITY INDICATORS SET 

3; THEN 

;sPARITY ABORT AFTER FORCE MISS 
sELSE 

;IF TAG PARITY ERROR 


3; THEN 

_—e- ERROR AFTER FORCE MISS 
;ELS 

;COPY MSER INITIO REG 4 

sMASK FOR BO AND Bl DATA 

:IF BO AND Bil DATA 


3; THEN 

s;DATA PARITY ERROR AFTER FORCE MISS 
sELSE 

VIF BO ERROR 

3; THEN 


3EQ 0295 


COKDABO KNI11-8 7's 


COKDAB.P11 


16335 
16336 
16337 
16338 
16339 


102162 
102164 
102170 
102172 
102174 
102176 
102200 
102202 
102210 
102216 
102222 
102226 
102234 
102240 
102242 
102244 


102306 
102312 
102316 


104012 
032703 
001403 
104013 
000401 
104014 
005003 


052737 
042737 
013701 
013702 
052737 
020127 


011637 
013703 
000002 


MACY11 30(1046) 05-APR- 
16:45 vest - 


000200 


177777 


000002 


002762 


177746 
003122 


001122 
177744 


177746 
177520 


177520 


000114 


1058; 


1008: 
L$: 


107%: 


108%: 
2s: 


FMPARR: 


L / 


84 16:45 PAGE 297 
FORCE MISS TEST 


#1000,8CSR 


14 
— a114 


cc 
aeTSTLOC 
TSTS 


(SP), $BDADR 
MSER, R3 


;LOW BYTE PARITY ERROR AFTER FORCE MISS 
:IF B81 ERROR 

3; THEN 

sHIGH BYTE PARITY ERROR AFTER FORCE MISS 
sENDIF 

sERROR DATA PATH 

sCLEAR MSER SAVE REGISTER 

;SET CCR BITS <3:2> = 1,0 

sOISABLE HALT ON BREAK 

sREAD TEST LOCATION 

sSAVE HIT/MISS REGISTER DATA 

sENABLE HALT ON BREAK 

sCOMPARE RECEIVED DATA TO PATTERN 2 

3IF DATAS NOT EQUAL THEN 

3IF RECIEVED DATA EQUAL TO PATTERN 1 

3; THEN 

3;IF HIT 


3; THEN 
sFORCE MISS READS FROM CACHE 


3sELSE 
sFORCE MISS READS FROM CACHE AND MISS 
sENDIF 

sERROR IN DATA PATH 

sRESTORE VECTOR 114 

;CLEAR CCR BITS<3:2> 

sWRITE TEST ADDRESS 


33GO TO NEXT TEST 


sSAVE ADDRESS THAT CAUSED ABORT 
sSAVE CONTENTS OF MEMORY SYSTEM ERROR 
sREGISTER AND RETURN 


SEQ 02% 


COKDABO KNJ11 B CLUSTER MACY11 30( 1046) rai - APR - 


COKDAB.P11 


102320 


102460 
102464 


013703 
000002 


05 -APR-84 16:45 


023122 
177752 
000004 


002762 
001000 


177744 


002762 
000114 


177746 
003122 
177746 
177520 


110504 
110504 


110504 
110504 


000114 
177520 


M/ 
84 16:45 PAGE 298 
- HIT/MISS REGISTER TEST PART 1 


-SBTTL TEST - HIT/MISS REGISTER TEST PART 1 

sHIT/MISS REGISTER TEST PART 1 - THIS TEST WILL VERIFY THAT THE HIT/MISS 
sREGISTER CORRECTLY LOGS HITS AND MISSES.FIRST WRITE A TEST ADDRESS WITH 
sBITS<3:2> CLEARED TO ALLOCATE CACHE AND SET A KNOWN DATA PATTERN INTO 
sTHE CACHE, THEN SET BIT<2> AND REWRITE THE SAME ADDRESS WITH NEW DATA. 
sNEXT CLEAR CCR BITS<3:2> AND READ THE TEST ADDRESS, THE HIT/MISS REGISTER 
sSHOULD LOGGED A HIT. FINALLY READ THE TEST ADDRESS PLUS 20000(8) THE 

IT /AISS REGISTER SHOULD HAVE LOGGED A MISS. 


i BGNTST 

sWRITE TEST ADDRESS 1 PATTERN 1 

;SET CCR BITS<3:2> = 0,1 

sWRITE TEST ADDRESS WITH PATTERN 2 

sCLEAR CCR BIT<3> 

;READ TEST ADDRESS 

:IF HIT/MISS REGISTER BIT 1 NOT SET THEN 
Ser ERROR IN RECORDING HITS IN HIT/MISS 
3 


sREAD TEST ADDRESS + 20000(8) 
sIF HIT/MISS REGISTER BIT 1 SET THEN 
3. ERROR IN RECORDING HITS IN HIT/MISS 


’ 
FF FSASESAHAKEESEEHSEEEEAEAEHESEEEEEEEEAEEEEEEAESEEALEAEHEEEEHEEAELE 


TSTS: SCOPE 
MOV 8114, SLOCOO sSAVE CONTENTS OF VECTOR 114 
MOV OHMPARR , 80114 sSETUP PARITY VECTOR TO POINT TO HANDLER 
CLR @eTSTLOC sWRITE TEST LOCATION WITH PATTERN 1 
MOV #BITO2, CCR sSET CCR BITS<3:2> = 0,1 


MOV 4177777, a@TSTLOC sWRITE TEST LOCATION WITH PATTERN 2 


MOV #200, CCR ;CLEAR CCR BIT 3 AND SET PARITY ABORTS 

BIC #1000 ,BCSR ;OISABLE HALT ON BREAK 

MOV @eTSTLOC, R1 ;READ TEST ADDRESS 

MOV HITMIS, RECDAT sSTORE REGISTER 

BIT @BITO2,RECDAT ;IF HIT/MISS REGISTER BIT 1 NOT SET 

BNE 1$ 3; THEN 

ERROR +45 sERROR IN RECORDING HITS IN HIT/MISS 
1$: MOV aeTSTLOC +8192. ,R1 ;READ TEST LOCATION + 20000(8) 

MOV HITMIS,RECDAT ;STORE REGISTER 

BIT #BITO2,RECDAT ;IF HIT/MISS REGISTER BIT 1 SET 

BEQ 2s ; THEN 

ERROR +45 sERROR IN RECORDING HITS IN HIT/MISS 
2s: MOV SLOCOO, 3#114 sRESTORE VECTOR 114 

BIS #1000,BCSR sENABLE HALT ON BREAK 

BR TST6 3:GO TO NEXT TEST 
HMPARR: MOV MSER, R3 sSAVE CONTENTS OF MEMORY SYSTEM ERROR 

RTI sREGISTER AND RETURN 


SEQ 0297 


COKVABO KDJ11-B8 CLUSTER MACY11 30(1046) 05-APR-84 
COKDAB.P11 45 


102572 
102574 


O05 - APR -84 


0127238 


16: 


001162 
177520 


000007 


000006 
0235144 


TEST 


TEST 


6:45 PAGE 


sHIT/MISS REGISTER TEST - 


sBY EXECUTING A TST @0HM 


N/7 


16 299 
- HIT/MISS REGISTER TEST 
- HIT/MISS REGISTER TEST 


THIS TEST WILL VERIFY THAT THE HIT/MISS 
REGISTER CORRECTLY LOGS CACHE HITS AND MISSES. IT WILL ALSO VERIFY 
s THAT EACH BIT OF THE REGISTER IS UNIQUE. THIS WILL BE DONE Br 
;FLOATING A ZERO THROUGH A FIELD OF ONES. THE ROTATING WILL BE DONE 


(WHERE HM IS THE ADDRESS OF THE HIT/MISS 


sREGISTER) AT SUCCESSIVE POSITIONS IN A SET OF EIGHT NOPS. THE READ 


;OF THE I 


sMISS TO BE RECORDED. 


a 
s;BGNTST 


s INITIALIZE LOOP INDICATOR 
s INITIALIZE EXPECTED DATA 


_ UNTIL LOOP INDICATOR = SEVEN 


; ; BACKGROUND DATA: 


sENOTST 


70 PAGE ADDRESS OF THE HIT/MISS REGISTER SHOULD CAUSE A 


PUT BACKGROUND DATA INTO EXECUTION BUFFER 
PUT TST INSTRUCTION INTO TEST LOCATION 


JUMP TO EXECUTE BUFFER 


IF EXPECTED DATA NE RECEIVED DATA THEN 
ERROR IN RECORDING HITS IN HIT/MISS 


ENDIF 


INCREMENT LOOP INDICATOR 


UPDATE EXPECTED DATA 


TsT 


: NOP 

NOP 

NOP 

NOP 

NOP 

NOP 

NOP 

NOP 

MOV QOHM ,R2 
RTS PC 


FF SSOSSESSEHHSHESHSEESEEESESESEEEESESOEEESEEEESSEEEEEEESESEEEESESEEEOESE 


TST6: 


1$: 


2s: 


3s: 


SCOPE 


@BACDAT, RO 
@TSTLOC.R1 
(RO)+, (CR 
R2, es 
LOOPIN, % 


$TMP1, @@TSTLOC + 20022 
4$ 


05737, (R 


1)- 


3). 


s INITIALIZE LOOP INDICATOR 

sSAVE FOR LATER 

sGET ADDRESS OF EXECUTION BUFFER 

sGET ADDRESS OF EXPECTED DATA TABLE 

sPUT ADORESS OF HIT/MISS REGISTER IN GPR 
;DISABLE HALT ON BREAK 

:00 UNTIL LOOP INDICATOR EQUALS 7 

s THEN EXIT 


sPUT BACKGROUND DATA INTO 
sEXECUTION BUFFER 


sLOOP FOR TEN WORDS 

sIS THIS LAST LOOP 

IF YES THEN 

sINVALIDATE FETCH OF “RECDAT © 


sMOVE “TST” INSTRUCTION TO BUFFER 


SEQ 0298 


be 


COKDABO KOJ11 B CLUSTER MACY11 50(1046) 05 APR-84 16:45 PAGE 300 
COKDAB.P 11 O05 APR-84 16:45 TEST HIT/MISS REGISTER TEST SEQ 9299 
164°S 1026000 012713 177752 MOV OHITMIS,(R3) sMOVE HIT.MISS REG. ADD. TO BUFFER 
16476 102604 004737 003122 a$; JSR Pc, TSTLOC sGO EXECUTE TEST CODE 
16477 102610 021437 110504 CMP (R4), RECDAT sIF EXPECTED DATA NOT EQUAL [10 
16478 102614 001403 BEQ S$ sRECEIVED DATA THEN 
164°9 102616 011437 001124 MOV (R4), $GDDAT sSAVE EXPECTED PATTERN 
16480 102622 104017 ERROR o17 sERROR IN RECORDING HITS IN HIT/MISS 
10481 102624 005724 5$: TST (R4)> sINCREMENT POINTER TO EXPECTED PATTERN 
16482 10262€ 005237 003114 INC LOOPIN s INCREMENT LOOP COUNTER 
16483 102632 0007 BR 1$ 
16484 102634 ENDHRT : 
16485 102634 052737 001000 177500 BIS #1000,8CSR sENABLE HALT ON SREAK 
erty: 102642 ee BR TST? ' 33GO TO NEXT TEST 
6487 
16488 102644 000240 BACDAT: .wORD NOP 
16489 102646 000240 -WORD NOP 
16390 102650 000240 -WORD NOP 
16491 102652 000240 -WORD NOP 
16492 102654 000240 -WORD NOP 
16493 102656 000240 «WORD NOP 
16494 102660 000240 -WORD NOP 
16495 102662 000240 -WORD NOP 
16496 102664 011537 110504 MOV CRS),RECDAT sSAVE CONTENTS OF MIT/MISS REGISTER 
16497 102670 000207 RTS PC 
16498 
16499 102672 00007? EXPTBL: .WORD 7? 
16500 102674 000037 WORD 37 


COKDABO KNI11 B CLUSTER MACY11 50( 1046) 


COKDAR.P 11 


1eS0? 
16508 
16509 
16510 
165il 
le5ic 
16518 
16514 
1eS1i5 
16516 
16517 
16518 
1651? 


OS -APR 84 16:45 


C8 
OS-APR-64 16:45 PAGE 301 
TEST - BYTE ALLOCATION TEST 


.SBTTL TEST - BYTE ALLOCATION TEST 

sBYTE ALLOCATION TEST - THIS TEST WILL VERIFY THAT THE CACHE SYSTEM CORRECILY 
sHANDLES BYTE ACCESSES. THE TEST WILL FIRST CHECK THAT A WRITE ACCESS WHICH 
31S A MISS DOES NOT UPDATE THE CACHE. THIS WILL BF DONE BY FIRST ASSURRING 

3A MISS AT A TEST LOCATION. THEN A WRITE BYTE ACCESS WILL BE DONE. FINALLY 
sTHE LOCATION WILL BE READ. THE WRITE BYTE SHOULD NOT HAVE ALLOCATED THE 
sADDRESS. NEXT THE TEST WILL. VERIFY THAT IF A WRITE BYTE ACCESS IS A HIT 

s THAT THE CACHE LOCATION IS UPDATED. THE TEST WILL FIRST WRITE A TEST t_OCATION 
sWITH A PATTERN TO ALLOCATE THE ADDRESS. THEN A SECOND PATTERN WILL BE WRITTEN 
TO THE HIGH BYTE OF THE TEST LOCATION, THE TEST LOCATION WILL THEN BE READ. 
sIF THE HIGH BYTE OF THE TEST LOCATION IS EQUAL TO THE SECOND PATTERN THEN THE 
‘aeeeare WAS UPDATED. THE SECOND TEST WILL BE REPEATED TO TEST LOW Brite 

: . 


: 

;BGNTST 

sSAVE VECTOR 114 

sLET VECTOR 114 POINT TO BYTE PARITY ROUTINE 
3SET PARITY ABORT BIT IN CACHE CONTROL REGISTER 
sREAD TEST LOCATION + 4K 

sWRITE LOW BYTE TO TEST ADDRESS 

sREAD LOW BYTE OF TEST ADDRESS 

3sIF HIT/MISS REGISTER BIT 1 SET THEN 

or ERROR WRITE BYTE ALLOCATES THE CACHE 
3 

sWRITE PATTERN 1 TO TEST LOCATION 

sWRITE BYTE PATTERN 2 TO TEST LOCATION>-1 

sIF BITL NOTSETIN HIT/MISS REGISTER THEN 


3. IF BO PARITY ERROR THEN 

Ss ‘ - ERROR LOW BYTE PARITY ERROR ON WRITE BYTE WIT 
3. L 

Ee ‘ IF Bl PARITY ERROR THEN 

3. “ ‘ . ERROR HIGH BYTE PARITY ERROR ON WRITE BYTE HIT 
Be " LS 

3. ‘ , WRITE BYTE HIT DOES NOT RECORD A HIT 
3. . ENOIF 

as ENOIF 

sELSE 

e READ TEST LOCATION 

Re IF RECIEVED DATA NOT EQUAL TO EXPECTED DATA THEN 

Rs . IF BYTE DATA REVERSED THEN 

Be ‘ ; - ERROR BITES REVERSED ON WRITE CYCLES 
8. . i. 

t. 4 ‘ IF HIGH BYTE DATA ZERO THEN 

Be ‘ ‘ : . ERROR IN WRITING TO HIGH BrTE 
Be . ‘ LSE 

ie ‘ A ‘ ERROR IN WRITING TO HIGH BYTE 
be ‘ ‘ ENDIF 

Be > ENDIF 

Rs ENOIF 

sENDIF 


sWRITE PATTERN 1 TO TEST LOCATION 
sWRITE BYTE PATTERN 2 TO TEST LOCATION (Ow Brie 
sIF BITL NOTSETIN HIT/MISS REGISTER THEN 
. IF 8O PARITY ERROR THEN 
. ERROR LOW BrTE PARIT? 


Bs FL St 


SEQ 0300 


COKDABO KDILL 
COKDAB.P 11 


16568 
1¢Se4 
16565 


16618 


102710 
102712 
102720 
102726 
102730 
102736 
102742 
192750 


032737 


B CLUSTER MACIIL 8001046) 
OS APR-84 16:45 


002762 
000114 


177746 
177520 


110504 
110504 


003123 
110504 
110504 


0035122 


003122 
110504 
110504 


£F APR s 16:4 
TES YTE ALL 


Ds 
BcartOn feet 


If B81 PARITY ERROR THEN 
ERROR HIGH BYTE PRITY 


ELSE 
is . WRITE BYTE HIT DOES NOT RECORD A HIT 
Be ° ENDIF 
6. ENDIF 
sELSE 
is READ TEST LOCATION 
Ss If RECIEVED DATA NOT EQUAL TO EXPECTED DATA THEN 
ie . IF BYTE DATA REVERSED THEN 
ie . ERROR BYTES REVERSED 
Os . ELSE 
Tt . . IF LOW at! DATA ZERO THEN 
ie ‘ . ELSE 
as , i ERROR IN DATA PATH 
8. ‘ . ENDIF 
Be ‘ ENDIF 
8. ENDIF 
sENDIF 


sCLEAR CACHE CONIROL REGISTER 


sRESTORE VECTOR 
sEXIT TsT 


114 


é 
sBYTE PARITY ROUTINE: psy MSER 


3 
sENOTST 


pp eeoceeaceseeos 


TST?; SCOPE 


18: CLR 


1018: ERROR 
2%: CMP 


35%; CLR 


E TURN 


SHSHASHESHSHEHEHASSHESSEHRSEHSHSSHSHEHSESHESHEESEHHEEHEESEES 


80114, SLOCOO sSAVE VECTOR 114 
OBYPARR ,80114 sLET VECTOR 114 POINT TO ABORT ROUTINE 
R3 sCLEAR MSER SAVE REGISTER 
eBITO7, CCR ;SET PARITY ABORT BIT IN CCR 
TSTLOC +8192. sREAD TEST LOCATION + 4K TO CAUSE MISS 
#1000,B8CSR sDISABLE HALT ON BREAK 
TSTLOC sWRITE LOW BYTE OF TEST LOCATION 
TSTLOC sREAD LOW BYTE OF TEST LOCATION 
HITMIS,RECDAT sSTORE REGISTER 
> ‘alae ianaeett 4 A OF HIT/MISS REGISTER SET 
ty 
+20 sWRITE BYTE ALLOCATES CACHE 
TSTLOC sWRITE PATTERN 1 TO TEST LOCATION 
0377, @OTSTLOC+1 sWRITE PATTERN 2 TO HIGH BYTE 
HITMIS,RECDAT :STORE REGISTER 
+ hans tnmeniat —_ NOTSETIN HIT/MISS REGISTER 
2 Hy 
= » ag hy BYTE HIT DOES NOT RECORD HIT 
sEL 
0177400, ae@TSTLOC sIF TEST LOCATION NOT EQUAL TO 
3$ sPATTERN 2 THEN 
22 38. TES REVERSED ON WRITE CYCLES 
TSTLOC sWRITE PATTERN 1 TO TEST LOCATION 


#377, aeTSTLOc sWRITE PATTERN 2 TO LOW BYTE 
HITMIS,RECDAT sSTORE REGISTER 
OBI TO2,RECDAT IF BITL NOTSETIN MIT MISS REGISTER 


SEQ 0301 


E& 
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COKDAB.P 11 05 -APR-84 16:45 TEST BYTE ALLOCATION TEST SEQ 0302 
1e019 103074 001001 BNE 4$ 3 THEN 

16620 103076 104012 ERROR *le sLOW BYTE PARITY ERROR ON WRITE BYTE HIT 
16621 103100 022737 000377 003122 4%: CMP 0377, aeTSTLOC sIF TEST LOCATION NOT EQUAL 10 

16622 103106 001401 BEQ S$ sPATTERN 2 THEN 

16623 103110 104022 ERROR +22 sBYTES REVERSED ON WRITE CYCLES 

16624 103112 005037 177746 S$: CLR ccR sCLEAR CCR BEFORE EXIT 

loo25 103116 052737 001000 177520 BIS #1000,BCSR sENABLE HALT ON BREAK 

16026 103124 013737 002762 000114 MOV SLOCOO, 90114 sRESTORE VECTOR 114 

oor 103132 000405 BR TST10 33GO TO NEXT TEST 

1662 

16629 

16030 103134 011637 001122 BYPARR: MOV (SP), $BDADR sSAVE ADORESS THAT —— ABORT 

16631 103140 013703 177744 MOV MSER, R3 sSAVE CONTENTS OF MSER 

16632 103144 000002 RTI 3RE TURN 
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COKDAB P11 


103146 
103150 
103154 
103160 
103166 
103174 
103200 
103206 
103212 
103220 


05 -APR-84 16:45 


000004 
004737 
005037 
012737 
052737 
005237 
012737 
005037 
042737 
042737 


001124 
172300 


003122 


172300 
177520 
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TEST - POR BITIS (BYPASS) TEST SEQ 0303 


-SBTTL TEST - POR BIT1S (BYPASS) TEST 

;POR BIT1S (BYPASS) TEST - THIS TEST WILL VERIFY THAT WHEN BIT<15> IS SET 

:IN A POR AND AN ACCESS IS MADE TO A LOCATION MAPPED BY THE SELECTED PDR 

s THAT WOULD NORMALLY CAUSE A CACHE ACCESS, THE CACHE IS BYPASSED (I.E. THE 
sCACHE LOCATION IS INVALIDATED AND A MAIN MEMORY IS READ. THIS WILL BE DONE 
;BY FIRST WRITING A TEST LOCATION WITH A KNOWN PATTERN TO ALLOCATE THE ADDRESS. 
s;THEN THE LOCATION WILL BE WRITTEN AGAIN WITH THE MMU ENABLED AND BIT <15> SET 
3IN THE CONTROLING POR WITH A NEW PATTERN. THE LOCATION WILL THEN BE READ 

sAND A MISS SHOULD BE LOGGED IN THE HIT/MISS REGISTER. THIS READ WILL ALSO 
sBRING VALID DATA INTO CACHE FROM MEMORY. THE MMU WILL AGAIN BE ENABLED 

sWITH BIT <15> SET AND A READ CYCLE DONE. THIS SHOULD INVALIDATE THE CACHE. 
sNEXT THE MMU WILL BE DISABLED AND THE LOCATION READ FOR A THIRD TIME. THIS 
sWILL BE DONE WITH BIT<15> STILL SET. A MISS SHOULU ALSO BE LOGGED. LASTLY 
sBIT<15> WILL BE CLEARED AND THE MMU ENABLED AND THE LOCATION AGAIN READ. 
sTHIS TIME A CACHE HIT SHOULD BE LOGGED. 

6 


3 

sBGNTST 

;SETUP MMU REGISTERS 

sWRITE TEST LOCATION WITH PATTERN 1 

3SET BIT<15> IN POR FOR TEST LOCATION 

sENABLE MMU 

sWRITE TEST LOCATION WITH PATTERN 2 

sDISABLE MMU AND CLEAR BIT<15> IN POR 

sREAD TEST LOCATION 

sIF HIT/MISS REGISTER BIT<1> SET THEN 

— ERROR CONDITIONAL BYPASS DOESN'T INVALIDATE CACHE 
3 

;SET BIT<15> IN POR FOR TEST LOCATION 

sENABLE MMU 

sREAD TEST LOCATION (SHOULD INVALIDATE CACHE ) 

sDISABLE MMU 

sREAD TEST LOCATION 

3IF HIT/MISS REGISTER BIT<1> SET THEN 

‘ saae ERROR CONDITIONAL BYPASS DOESN'T INVALIDATE CACHE 
3 


sCLEAR BIT<15> IN PDR 

;TURN ON MMU 

sREAD TEST LOCATION 

sIF HIT/MISS REGISTER BIT<1> NOT SET THEN 
3. ERROR IN RECORDING HITS IN HIT/MISS 


;TURN OFF MMU 

sENDTST 

a 

PEC I LUr iris iri irivititriivivitiviritiritr ty) 


TST10: SCOPE 


JSR PC, INI TMM sSETUP MEMORY MANAGEMEMT REGISTERS 
CLR aeTSTLOC sWRITE TEST LOCATION WITH PATTERN 1 
MOV 0177777, $GDDAT sSAVE DATA IN MEMORY 

BIS oBIT15, KIPDRO sSET BIT1S IN POR FOR TEST LOCATION 
INC SRO ;TURN ON MEMORY MANAGEMENT 

MOV 9177777, a@TSTLOC sWRITE TEST LOCATION WITH PATTERN 2 
CLR SRO 3 TURN OFF MEMORY MANAGEMENT 

BIC oBIT1S, KIPDRO ;CLEAR BIT1S IN POR FOR TEST LOCATION 


BIC #1000,BCSR ;DISABLE HALT ON BREAK 


COKDARO K 
COKDAB. 


16690 
16691 
16692 


Pl 


013701 


052737 


003122 
177752 
000004 


177572 
003122 
177752 
000004 


000001 
001000 
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110504 
110504 


172300 


172300 


110504 


110504 


110504 


110504 


177572 
177520 


05 - APR - 
Test - 


2s: 


3$: 


4$: 


84 16:45 PAGE 305 
POR B1T15 (BYPASS) TEST 


G68 


@eTSTLOC,R1 
HITMIS,RECDAT 
gies pmrrt 


+23 
“BIT1S, KIPDORO 
SRO 


TSTLOC 

@BIT15, KIPDRO 
SRO 
@eTSTLOC,R1 
HITMIS,RECDAT 
#BITO2,RECDAT 


aeTSTLOCc 
HITMIS,RECDAT 
OBITO2,RECDAT 
4$ 

+45 

#BITOO, SRO 
#1000,BCSR 


SEQ 0304 


sREAD TEST LOCATION 

sSAVE HIT/MISS REGISTER 
a REGISTER BIT 1 SET 

i 

sCONDITIONAL BYPASS DOESN’ T INVALIDATE CACHE 
3SET BIT15 IN POR FOR TEST LOCATION 
:TURN ON MEMORY MANAGEMENT 

sREAD TEST LOCATION 

;CLEAR BIT 15 IN POR 

3TURN OFF MMU 

sREAD TEST LOCATION 

sSTORE HIT/MISS TO REGISTER 2 

ns aaa REGISTER BIT 1 SET 


é 

sCONDITIONAL BYPASS DOESN’T INVALIOATE 0 CACHE 
sTURN ON MEMORY MANAGEMENT 

sREAD TEST LOCATION ONE MORE TIME 

sSTORE HIT/MISS TO REGISTER 2 

s;IF HIT/MISS REGISTER BIT 1 NOT SET 


3; THEN 

sERROR IN RECORDING HITS IN HIT/MISS 
3 TURN OFF MMU 

sENABLE HALT ON BREAK 


H& 


COKDABO KDJ11 8 CLUSTER MACY11 30(1046) OS-APR-84 16:45 PAGE 3506 
COKDAB.P 11 


e714 
te71s 


16768 
16769 


103372 
103374 
103400 
103406 
103412 
103416 
103422 
103424 
103426 
103432 
103436 


000004 
004737 
012737 
012701 
005237 
012702 
005721 
077202 
012701 
012702 
012703 
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132156 


172354 


TEST - FLUSH CACHE TEST 


-SBTTL TEST ~- FLUSH CACHE TEST 

sFLUSH CACHE TEST - THIS TEST WILL VERIFY THAT WHEN CCR BIT<8> IS 
;SET, THE ENTIRE CACHE IS INVALIDATED. FIRST 8K BYTES OF ADDRESSES 
sWILL BE READ TO ALLOCATE CACHE. THEN THE CACHE WILL BE FLUSHED. 

; THE SAME SET OF ADDRESS WILL THEN BE READ AND THE HIT/MISS REGISTER 
sCHECKED AFTER EACH READ FOR A MISS TO BE LOGGED. 


3 

;BGNTST 

;GET FIRST ADDRESS OF 8KB BUFFER 

s INITIALIZE LOOP COUNTER TO 4KWORD COUNT 
3:00 UNTIL LOOP COUNTER = 0 

ae READ @ADDRESS>+ 


sENDDO 

;GET FIRST ADDRESS OF 8KB BUFFER 

s INITIALIZE LOOP COUNTER TO 2kWORD COUNT 
sINITIALIZE MISS COUNT TO 4KWORD COUNT 
3FLUSH CACHE 

300 UNTIL LOOP COUNTER = 0 


3E 
3 


READ @ADDRESS- 
ICREMENT ADDRESS TO READ EVERY 2WORDS 
IF WIT/MISS REGISTER BIT<1> SET THEN 


ENDIF 


DECREMENT MISS COUNT 


NOOO 
GET FIRST ADDRESS OF 8KB BUFFER 
s INITIALIZE LOOP COUNTER TO 4KWORD COUNT 


3:00 UNTIL LOOP COUNTER = 0 
READ @ADDRESS+ 


:ENDDO 
;GET LAST ADORESS OF 8KB BUFFER 
sINITIALIZE LOOP COUNTER TO 2kWORD COUNT 


sFLUSH CACHE 
300 UNTIL LOOP COUNTER = O 
READ SADDRESS - 
DECREMENT ADDRESS TO READ EVERY WORDS 
IF HWIT/MISS REGISTER BIT<1> SET THEN 


Se 
sENDDO 
3;IF MISS COUNT NOT EQUAL TO 4096. 


ENDIF 


DECREMENT MISS COUNT 


ERROR HITS RECORDED AFTER FLUSHING CACHE 


sENDIF 

sENDTST 

3 

FF SHHSSHSHEHSHESHASESEHESESESSESEESESEHEEEESASSESESESESEHSSEESEEESHEHEHEEEEE 


TST11: SCOPE 


JSR PC, INI TMM sINITIALIZE MMU 

MOV #1600 ,K IPAR6 sLET PAR6 POINT TO LOW 28K 

MOV #140000 ,,R1 ;GET ADDRESS OF 8K BYTE BUFFER 

INC SRO sENABLE MMU 

MOV 04096., R2 sINIT LOOP COUNTER TO 4K WORD COUN’ 
18: TST (R1)+ sREAD ADDRESS TO ALLOCATE CACHE 

SOB Re, 1$ 300 UNTIL ALL LOCATIONS ALLOCATED 

MOV #140000 ,R1 sGET ADDRESS OF 8K BYTE BUFFER 

MOV @2048,, Re ;INIT LOOP COUNTER TO 2k WORD COUNT 

MOV 04096., RS sINITIALIZE MISS COUNT 10 4k 


SEQ 0305 


COKDABO KDITL B CLUSTER MACY11 50( 1046) 
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COKDAB LP 11 


le7 ro 
1errl 
16772 
16773 
16°74 
1677S 
lotto 
16 ie Med 
16778 
16779 
16780 
16 "81 
16782 
16783 
16784 
1o7ss 
16786 
16787 
16788 
16789 
16790 
16791 
16792 
16793 


012737 


16:45 


000400 
001000 


177752 


177746 
177520 


110504 
110504 


177520 


177746 
177520 


110504 
110504 


177520 


OS APR. 
TES! 
2s: 
3$: 


4s; 


5$: 


6%: 


18 


84 16:45 PAGE 307 
FLUSH CACHE TEST 
MOV #400, ccr 
BIC #1000 ,BCSR 
TsT (R1)+ 
MOV QOHITMTS, RECDAT 
BIT #BITO2,RECDAT 
BEQ 3$ 

Cc R3 
ADD @2,R1 
SOB Re, es 
BIS #1000,BcCSR 
MOV 94096. ,R2 
MOV #140000,R1 
TST (R1)+ 
S08 R2,48 
MOV #2048. ,R2 
MOV #160000 ,,R1 
MOV #400,CCR 
BIC #1000,BCSR 
TST -CR1L) 
MOV @OHITMIS ,RECDAT 
BIT @BITO2,RECDAT 
BEG 63 
DEC R3 
SUB 2,R1 
SOB R2,5$ 
BIS #1000,BCSR 
CLR SRO 
CMP 94096., R35 
BEQ 8$ 
ERROR °24 
BR TSTle 


sFLUSH CACHE 

sDISABLE HALT ON BREAK 

sREAD ADDRESS 

sSTORE REGISTER 

sIF HIT/MISS REGISTER NOT EQUAL 
3TO ZERO THEN 

sDECREMENT MISS COUNT 

3:00 IN 2 WORD INCREMENTS (PMI MEMORY ) 
3;LOOP UNTIL ENTIRE CACHE CHECKED 
sENABLE HALT ON BREAK 

300 FOR 4K 

sSTARTING WITH O 

sALLOCATE IN CACHE 

300 FOR 4K 

300 FOR THE 2ND HALF 

sSTART WITH LAST LOCATION 

sFLUSH CACHE 

sDISABLE HALT ON BREAK 

sREAD ADDRESS 

sSTORE REGISTER 

sIF HIT/MISS REGISTER NOT EQUAL 
3TO ZERO THEN 

;DECREMENT MISS COUNT 

:00 IN 2 WORD DECREMENTS 

300 FOR 2k WORDS 

sENABLE HALT ON BREAK 

;TURN OFF MMU 

sIF MISS COUNT NOT EQUAL. TO 4K WORDS 


3 THEN 
sHITS RECORDED AFTER FLUSHING CACHE 


3:GO0 TO NEXT TEST 


SEQ 0304 
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COKDAB P11 


leaos 
168 od 
1680s 
1680. 
1680" 
16808 
16809 
1oa8ic 
164811 
16812 
12818 
losi4a 
16815 
16816 
168:7~ 
16818 
16819 
16820 


16854 
16855 


103772 


05 APR 84 16:45 


177746 
177520 


110504 
110504 


110504 
110504 


110504 
119504 


110504 
110504 


05 APR -84 
TES! 


-SBTTL TEST 


SE 


16:45 PAGE 508 
UNCONDITIONAL BYPASS TEST 


- UNCONDITIONAL BYPASS TEST 


sUNCONDITIONAL BYPASS TEST - 


; 
;BGNTST 


THIS TEST WILL VERIFY THAT WHEN CCR 
sBIT<9> [S SET, A MEMORY REFERENCE IS FORCED TO MAIN MEMORY. THIS 
sWILL ALSO VERIFY THAT READ AND WRITE HIT INVALIDATE THE CACHE 

sLOCATIONS WHEN BYPASS IS SET. 


sREAD TEST LOCATIONS TO SETUP POSSIBILITY OF HIT 


3SET CCR BIT<9> 


sREAD FIRST TEST LOCATION 
IF MIT/MISS REGISTER BIT<1> NOT SET THEN 


- 
sENDIF 


sWRITE SECOND TEST LOCATION 
sIF HIT/MISS REGISTER BIT<1> NOT SET THEN 
3. ERROR IN RECORDING HITS IN HIT/MISS 


sENDIF 


;CLEAR CCR BIT<9> 
sREAD FIRST LOCATION 
:IF HIT/MISS REGISTER BIT<1> SET THEN 


3. 
sENDOIF 


sREAD SECOND LOCATION 
sIF HIT/MISS REGISTER BIT<1> SET THEN 
3. ERROR BYPASS DOESN’ T INVALIDATE CACHE 


ERROR IN RECORDING HITS IN HIT/MISS 


ERROR BYPASS DOESN'T INVALIDATE CACHE 


FF FSSSEHSESHSASHAEHASAEEASESESHESESHEEESEEEEHEESHEHEEEESEEEEHEEEEHEHEEEEEE 


sALLOCATE FIRST TEST LOCATION 
sALLOCATE SECOND TEST LOCATION 
;SET CCR BIT 9 (CACHE BYPASS) 


TST12: SCOPE 
TsT 
1$; 
2s: 
3$; 


4$: 


aeTSTLOC 
@eTSTLOC+2 
#BITO9, CCR 
#1000,BCSR 
aeTSTLOC 
HITMIS,RECDAT 
BI TO2,RECDAT 
2s 
+45 
@eTSTLOC+-2 
HITMIS,RECDAT 
#BITO2,RECDAT 
3$ 
045 
ae¢TSTLOC 
HITMIS,RECDAT 
#BITO2,RECDAT 
4$ 
+25 
aeTSTLOC+2 
HITMIS,RECDAT 
SOs Sas AERO 
$ 


;DISABLE HALT ON BREAK 
sREAD FIRST TEST LOCATION 


SEQ 0307 


sSTORE HIT/MISS TO REGISTER 2 


sIF HIT/MISS REG. BIT 1 NOT 
THEN 


é 
sERROR IN RECORDING HITS IN 
sWRITE SECOND LOCATION 


SET 
HIT/MISS WITH CCR<9> 


sSTORE MIT/MISS TO REGISTER 2 


:IF HIT/MISS REG. BIT 1 NOT 
3; THEN 

sERROR IN RECORDING HITS IN 
sREAD FIRST TEST LOCATION 
sSTORE HIT/MISS TO REGISTER 
ot es REG. BIT 1 SET 


SET 
MIT/MISS WITH CCCR<9 
2 


37 
sBYPASS DOESN'T INVALIDATE CACHE 


sWRITE SECOND LOCATION 
sSTORE HIT/MISS TO REGISTER 
sIF HWIT/MISS REG. BIT 1 SET 
3; THEN 


> 
« 


K8 
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OS APR -84 16:45 TEST Gnconsi —— BYPASS TEST 
10850 108 "74 104025 ERROR +2 
1685" 10377 042737 001000 177746 S$: BIC eB1T09, CCR 
is858& 104004 052787 001000 177520 BIS #1000,BCSR 
16859 


sBYPASS DOESN’ T TNVAI TDATE CACHE 
sRESTORE CCR 
sENABLE HALT ON BREAK 


SEG 0308 


L8 
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COKDAB.P11 


16914 
16915 


05S -APR-84 16:45 


- WRITE WRONG DATA PARITY TEST 


-SBTTL TEST - WRITE WRONG DATA PARITY TEST 

sWRITE WRONG DATA PARITY TEST - THIS TEST WILL VERIFY THAT WHEN CCR 
sBIT<6> = 1 AND CCR BITS<7,0> = 0,1, A READ MISS OCCURS AFTER A 
sWRITE. THE WRITE WITH CCR BIT<6> = 1 TO A LOCATION WILL CAUSE A 
sCACHE UPDATE AND WRONG PARITY TO BE WRITTEN SO WHEN THE LOCATION 
sIS READ INSTEAD OF A HIT BEING RECORDED THE CACHE PARITY ERROR 
sWILL CAUSE A CACHE MISS. THIS TEST WILL BE DONE A BYTE AT A TIME. 


; 

s;BGNTST 

sSAVE CONTENTS OF VECTOR 114 

sLET VECTOR 114 POINT TO ABORT ROUTINE 

;CLEAR MSER 

;IF MSER NOT CLEAR THEN 

+ IF ERROR MSER DOESN’ T CLEAR ON WRITE REFERENCE 
; 


sWRITE TEST LOCATION 

sSET BITS<6,0> IN CCR 

sWRITE TEST LOCATION LOW BYTE 

sCLEAR CCR BI1<6> (WRITE WRONG DATA PARITY) 
s INITIALIZE ERROR INDICATORS 

sREAD TEST LOCATION LOW BYTE 

:IF BIT<1> SET IN HIT/MISS REGISTER THEN 


- - PARITY ERROR DOESN'T CAUSE MISS 

3EL 

iv IF MSER BITS <7:5> ZERO THEN 

i ‘ - PARITY ERROR DOESN'T SET MSER PROPERLY 
Ss ‘ 

Ss . SET ERROR IN LOW BYTE INDICATOR 

Be ENDIF 

Rs ENDIF 

sENDIF 

;CLEAR MSER 

;IF MSER NOT CLEAR THEN 

‘or . ERROR MSER DOESN'T CLEAR ON WRITE REFERENCE 
3 


;SET CCR BIT<6> 

;WRITE TEST LOCATION HIGH BYTE 

sCLEAR CCR BIT<6> 

sREAD TEST LOCATION HIGH BYTE 

sIF BIT<1> SET IN HIT/MISS REGISTER THEN 

3. IF MSER BITS<7:5> NOT SET THEN 

PARITY ERROR DOESN’ T CAUSE A MISS 


Bs ELSE 

Sis ‘ SET ERROR IN HIGH BYTE INDICATOR 
Be ENDIF 

;ELSE 

S. IF MSER BITS <7;5> ZERO THEN 

8. PARITY ERROR DOESN'T SET MSER 


H ENDIF 
sENDIF 


sRESTORE CONTENTS OF VECTOR 114 

;IF ERROR INDICATORS SET THEN 

3. IF ERROR IN BOTH BYTES THEN 
i . PARITY ERROR IGNORED 
i. ELSE 


ie . IF ERROR IN LOW BYTE THEN 


SEQ 0309 


COKDABO KDJ11 B CLUSTER MACY11 30( 1046) 
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COKDAB .P11 


16916 
16917 
16918 
16919 
16920 
16921 
16922 
16923 
16924 
16925 
16926 
16927 
16928 


16 


177744 
177744 


003122 
000101 
000377 
000100 


001000 


003122 
177752 
000004 


000340 


177744 
177744 


000340 


177746 
002762 
000003 


002762 
000114 


177746 
003122 
177746 


177520 


177744 


177746 
003123 
177746 


110504 
110504 


177744 


000114 


05 - APR -84 
TEST - WR 


TsT 


M8 


16:45 PAGE 311 
ITE WRONG DATA PARITY TEST 


LOW BYTE PARITY ERROR IGNORED 
HIGH BYTE PARITY ERROR IGNORED 


ELSE 
ENDIF 


a 
sDATA PARITY ABORT ROUTINE; 


3 
sENDTST 


ILLEGAL PARITY INTERRUPT 


RETURN 


FF FSAASHEAREAESEEHEEEEEEEAEAEEAREEEAREEEEESEEESEEEEAREEEEEOHOEREROE 


TST13: 


1$: 


2s: 


3$; 


4$: 


5$: 


6%: 


SCOPE 


@¢114, SLOCOO 


#DAPABO ,8#114 
MSER 

MSER 

1$ 

+26 

ae¢TSTLOC 
#101, CCR 
0377, TSTLOC 
—_ CCR 
#1000,B8CSR 
aeTSTLOC 
HITMIS, R3 
#BITO2, R3 

es 

+27 

3$ 

#340, MSER 
3$ 

+30 

MSER 

MSER 

4$ 

+26 

#BITO6, CCR 
0377, aeTSTLOC+1 
#BITCs, CC 
@eTSTLOC+1 
HITMIS,RECDAT 
#BITO2,RECDAT 
5$ 

e27 

6$ 

#340, MSER 
6$ 

+30 

CCR 

SLOCOO, 3#114 
#3, R2 

7$ 


sSAVE CONTENTS OF VECTOR 114 

sLET VECTOR POINT TO ABORT ROUTINE 
;CLEAR MSER 

;IF MSER NOT CLEAR 

3; THEN 

sMSER DOES NOT CLEAR ON WRITE REFERENCE 
sWRITE TEST LOCATION TO ALLOCATE CACHE 
;SET BITS<6,0> IN CCR 

sWRITE LOW BYTE WITH BAD PARITY 

;CLEAR WRITE WRONG DATA PARITY BIT 
sCLEAR ERROR INDICATORS 

sDISABLE HALT ON BREAK 

sREAD LOW BYTE OF TEST LOCATION 

s;SAVE HIT/MISS 

;IF BIT 1 SET IN HIT/MISS REGISTER 


3; THEN 
a ERROR DON'T CAUSE A MISS 
4 4 MSER BIT<7:5> NOT ZERO 

THEN 


iPARITY ERROR DON'T SET MSER WITH CCR<7?7>=0 
;CLEAR MSER 

;IF MSER NOT CLEAR 

3; THEN 

sMSER DOES NOT CLEAR ON WRITE REFERENCE 
;SET CCR BIT 6 CWRITE WRONG PARITY) 
sWRITE HIGH BYTE OF TEST LOCATION 
;CLEAR WRITE WRONG PARITY BIT 

;READ HIGH BYTE OF TEST LOCATION 

;SAVE HIT/MISS 

C—" 1 SET IN HIT/MISS REGISTER 


é 
a he ERROR DON'T CAUSE A MISS 
sIF BITS <7:5> ZERO 

3 THEN 


;PARITY ERROR DON’T SET MSER WITH CCR< 7>-0 
;CLEAR CCR BEFORE EXIT 

sRESTORE CONTENTS OF VECTOR 114 

; oe INDICATORS SET 

° 


SEQ 0310 


Se KDJ11-B CLUSTER ed | 1 
05 - APR -84 


16972 
16973 


104031 
005037 
013737 
052737 
000404 


011637 
104007 
000002 


177746 
002762 
001000 


001122 


30( 1046) 05 - APR - 84 
TEST 


000114 
177520 


7$;: 


DAPABO: 


N8 


16:45 PAGE 312 


WRITE WRONG DATA PARITY TEST 


+31 

CCR 

SLOCOO ,80114 
#1000 ,8CSR 
TST14 

‘7 $BDADR 


sPARITY ERROR IGNORED 

sCLEAR CCR 

sRESTORE PARITY TRAP 

sENABLE HALT ON BREAK 
3sGO TO NEXT TEST 


;SAVE ADDRESS THAT CAUSED ABORT 
sILLEGAL PARITY INTERRUPT 


SEQ 0311 


COKDABO KDJ11-8 CLUSTER MACY11 50( 1046) 


COKDAB P11 


10988 
16984 
16985 
16980 
1698> 
16988 
16989 
16990 
1699) 
16992) 
16993 


OS APR-84 16:45 


002762 
000114 
177520 
177746 
177746 
110504 
110504 
000114 


177520 


Bo 
16:45 PAGE 313 
TEST - WRITE WRONG TAG PARITY 


-SBTTL TEST - WRITE WRONG TAG PARITY 

sWRITE WRONG TAG PARITY - THIS TEST WILL VERIFY THAT A READ MISS 
sOCCURS AFTER A WRITE WILL CCR<10> = 1 AND CCR<7,0> = 0,1. THE WRITE 
370 THE LOCATION WILL CAUSE A CACHE UPDATE BUT THE TAG WILL BE 
sWRITTEN WITH THE WRONG PARITY, WHEN THE LOCATION IS READ INSTEAD 
eeee CACHE HIT OCCURRING THE PARITY ERROR SHOULD CAUSE A CACHE 

3 >. 


3 

sBGNTST 

sSAVE CONTENTS OF VECTOR 114 

sLET VECTOR 114 POINT TO ABORT ROUTINE 

;CLEAR MSER 

3SET WRITE WRONG TAG PARITY BIT<10> 

sWRITE TEST LOCATION 

sCLEAR CCR BIT<10> AND SET ABORT DISABLE BIT<O> 
sREAD TEST LOCATION 

3IF BIT<1> SET IN HIT/MISS REGISTER THEN 


05 - APR -84 
SEQ O51z2 


3. IF MSER BITS <7:5> SET THEN 
i. ; - PARITY ERROR DOESN'T CAUSE MISS 
i. a 


3. PARITY ERROR DOESN'T SET MSER WITH CCR< 7>+0 


- ENOIF 
sENDIF 

3SET WRITE WRONG TAG PARITY BIT<10> 

sWRITE TO A BYTE OF A TEST LOCATION 

sSAVE HIT/MISS REGISTER 

sCLEAR WRITE WRONG TAG PARITY BIT 

3IF BIT<1> NOT SET IN HIT/MISS REGISTER THEN 


- ERROR 
sENDIF 
sRESTORE VECTOR i114 
sExIT 1st 
3 
3TAG PARITY ABORT ROUTINE: 
H ILLEGAL PARIT: INTERRUPT 
3 RE TURN 
sENDOTST 
POU YUTITIT IIIT CITI IIIT ITT TIT rrr r rir irri riiiirritii ty Titty 
iS714; SCOPE 
MOV @0114, sStocoo sSAVE CONTENTS OF VECTOR 114 
MOV @TAPABO,80114 sLET VECTOR POINT TO ABORT ROUTINE 
BIC 91000 ,B8CSR sOISABLE HALT ON BREAK 
CLR MSER ;CLEAR MSER 
MOV OBIT10, CCR 3SET WRITE WRONG TAG PARITY 
CLR @eTSTLOC sWRITE LOCATION WITH BAD fAG PARITY 
MOV oBITOO, CCR ;CLEAR BIT 10 AND SET BIT O 
Ts! a@eTsSTLOc sREAD TEST LOCATION 
MOV HITMIS,RECDAT sSAVE MIT/MISS REGISTER 
BIT OBITO2 ,RECDAT sIF BIT 1 SET IN MIT/MISS REGISTER 
BEQ es 3 THEN 
ERROR eel sPARITY ERROR DON'T CAUSE A MISS 
es: MOV SLOCOO, 0114 sRESTORE CONTENTS OF VECTOR 118 
CLR MSER sCLEAR ERRORS 
BIS #1000,8CSR sENABLE HALT ON BREAK 
HR TST15 3360 TO NEXT TEST 


C9 
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17080 104426 011637 001122 TAPABO: MOV (SP), $BDADR sSAVE ADDRESS THAT CAUSE ABORT 

17041 104432) «104007 ERROR +7 sILLEGAL PARITY INTERRUPT 

17042 1044384 000002 RTI 


17038 


DY 
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17044 .SBTTL TEST - PARITY ABORT TEST 

17045 sPARITY ABORT TEST - THIS TEST WILL VERIFY THAT WHEN CCR<7,0> «: 
17046 31,0, AN ABORT OCCURS ON THE EXECUTION OF AN INSTRUCTION THAT HAS 
17047 ;BEEN WRITTEN WITH WRONG PARITY. 

17048 3 

17049 3 

17050 3:BGNITST 

17051 sSAVE VECTOR 114 

17052 sSAVE VECTOR 4 

17053 3LET VECTOR 114 POINT TO ABORT ROUTINE 

17054 3LET VECTOR 4 POINT TO ERROR ROUTINE 

17055 sCLEAR EXPECTING ABORT FLAG 

17050 3SET CCR<10> WRITE WRONG TAG PARITY BIT 

17057 sWRITE TEST ADDRESS 

17058 sCLEAR CCR<10> 

17059 3SET CCR TO ®200 ENABLE PARITY ABORTS 

17060 ;SET EXPECTING ABORT FLAG 

17061 sREAD TEST ADDRESS 

17062 ;IF ABORT FLAG NE O THEN 

17063 fie ERROR IN PARITY ABORT LOGIC 

17 sENOIF 

17065 sRESTORE VECTOR 114 

17066 sRESTORE VECTOR 4 

17067 3;EXIT TsT 

17068 : 

17069 sABORT ROUTINE: IF EXPECTING ABORT FLAG NOT SET THEN 

17070 ; . ERROR NO ABORT SHOULD HAVE OCCURRED 

17071 3 ELSE 

17072 3 ‘ CLEAR (EXPECTING) ABORT FLAG 

17073 , ENDIF 

17074 ; IF MSER NOT EQUAL TO 100040 THEN 

17075 3 : PARITY ABORT LOGIC DOESN'T SET MSER PROPERLY 
17076 3 ENDIF 

17077 5 IF PC = UPDATED PC THEN 

17078 ; : ILLEGAL PARITY ABORT 

17079 : ENDIF 

17080 3 RE TURN 

17081 ; 

17082 sENDTST 

17083 POU YUTIVIVITITTT Titi rirri rier irirriirirritiirrittri iri itty 
17084 104436 000004 TST15: SCOPE 

17085 104440 013737 000114 002762 MOV 8114, StLOCOoOd sSAVE VECTOR 114 

17086 104446 013737 000004 002764 MOV Q0o4, SLOCO1 sSAVE VECTOR 4 

peed 104454 012737 104556 000114 MOV ®ABORTR, 90114 sLET VECTOR 114 POINT TO ABORT ROUTINE 

o 
poe 3 TO AVOID CONFUSION ALLOCATE IN CACHE FOLLOWING INSTRUCIONS 
$ 

17091 104462 012704 104462 MOV @, ,R4 sSTART WITH CURRENT 

17092 104466 005724 13; TST (RG). sREAD A WORD 

17093 104470 022704 104556 cmp OABORTR,R4G sGOT TO ABORT ROUTINE? 
17094 104474 001374 BNE 1% 3IF NOT, KEEP ON ALLOCATING 
17095 104476 005000 CLR RO sCLEAR EXPECTING ABORT FLAG 
17096 104500 012737 002000 177746 MOV oBIT10, CCR 3SET WRITE WRONG PARITY BIT 
17097 104506 005037 003122 CLR a@eTsSTLOoc sWRITE TEST LOCATION WITH BAD PARIT: 
17098 104512 012737 000200 177746 MOV #BITO7, CCR sENABLE ABORTS, CLEAR wwTP BIT 
17099 104520 005100 COM RO 358 T EXPECTING ABORT FLAG 


EY 
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17100 104522 005737 008122 ABORTI: TST aeTSTLOC sREAD TEST LOCATION (SHOULD CAUSE ABORT) 
17101 104526 005700 TST RO sIF ABORT FLAG NOT EQUAL ZERO 
17102 104530 001401 BEQ 1$ + THEN 
17103 104532 104034 ERROR +34 sPARITY ABORT LOGIC DOESN'T WORK 
17104 104534 013737 002762 000114 18: MOV SLOCOO, 90114 sRESTORE VECTOR 114 
1710S 104542 013737 002764 000004 MOV SLOCO1, @04 sRESTORE VECTORE 4 
17106 104550 005037 177744 CLR MSER 
hed 104554 000426 BR TST16 33GO TO NEXT TEST 
17109 
17110 104556 013703 177744 ABORTR: MOV MSER,R3 sSAVE MSER 
17111 104562 005700 TST RO sIF EXPECTING ABORT FLAG NOT SET 
17112 104564 001004 BNE 1$ + THEN 
17113 104566 011637 001122 MOV (SP), $BDADR sSAVE ABORT ADDRESS 
17114 104572 104007 ERROR +7 sILLEGAL PARITY INTERRUPT 
17115 104574 000401 BR 2s sELSE 
17116 104576 005000 1$: CLR RO sCLEAR CEXPECTING) ABORT FLAG 
17117 104600 022737 100040 177744 2%: CMP #100040 ,MSER sIF MSER NOT EQUAL TO 100040 
17118 104606 001404 BEQ 3$ 3 THEN 
17119 104610 012737 100040 001124 MOV #100040, sGDDAT sSAVE PROPER MSER SETTING 
17120 104616 104035 ERROR +35 sPARITY ABORT DON'T SET MSER PROPERLY 
17121 104620 021627 104526 3$; CMP (SP), GABORTI +4 sIF PC EQUAL TO UPDATE PC 
17122 104624 001401 BEQ as 3 THEN 
17123 104626 104007 ERROR +? sILLEGAL PARITY INTERRUPT 

7124 104630 e 4$; RTI sRE TURN 
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000114 
104730 


104650 
104730 
000100 
003122 
177746 


003122 


002762 
000114 


177746 
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-SBTTL TEST - PARITY INTERRUPT TEST 

sPARITY INTERRUPT TEST - THIS TEST WILL VERIFY THAT WHEN CCR<7,0> = 
30,0, A PARITY INTERRRUPT OCCURS AFTER EXECUTION OF AN INSTRUCTION 
ee HAS BEEN WRITTEN WITH WRONG PARITY. 


}BGNT ST 

sSAVE CONTENTS OF 114 

;SETUP VECTOR 114 TO POINT TO INTERRUPT ROUTINE 
sCLEAR EXPECTING INTERRUPT FLAG 

sWRITE TEST ADDRESS WITH BAD PARITY 

;SET EXPECTING INTERRUPT FLAG 

sREAD TEST ADDRESS 

sIF INTERRUPT FLAG NE O THEN 

* eorr PARITY INTERRUPT LOGIC DOESN’ T WORK 

F 


sRESTORE |< ring OF VECTOR 114 
one TS 


} INTERRUPT ROUTINE: IF EXPECTING INTERRUPT FLAG NE 1 THEN 
bs on ERROR NO INTERRUPT SHOULD HAVE OCCURRED 
L 


bor CLEAR (EXPECTING) INTERRUPT FLAG 
wi SAVED oon TO UPDATED PC THEN 

F PC = TEST INSTRUCTION PC THEN 
ie on ERROR INSTRUCTION ABORTED 
L 

° ILLEGAL PARITY ABORT 

. ENOIF 
ENDIF 
IF MSER NE @340 THEN 
— PARITY INTERRUPT DOESN'T SET MSER PROPERLY 


RETURN 


m 
S 
~ 
w 
4 


FE SSSSHSHESHSSEHSHHHEHAHAEHSEHESHEHEESEHHEEHEHCHEEHESHEESEAEHEHEEEEHEEHEEEEE 


TST16: SCOPE 


MOV @¢114, SLOCOO sSAVE CONTENTS OF VECTOR 114 
MOV GINTERR,@0114 sLET VECTOR POINT TO INTERRUPT ROUTINE 
Q 
; TO AVOID CONFUSION ALLOCATE IN CACHE FOLLOWING INSTRUCIONS 
i 
MOV @.,R4 sSTART WITH CURRENT 
1$: TST (R4)> sREAD A WORD 
CMP ®INTERR,R4 ;GOT TO INTERRUPT ROUTINE? 
BNE 1$ 3IF NOT, KEEP ON ALLOCATING 
CLR R1 sCLEAR EXPECTING INTERRUPT FLAG 
BIS #BIT06, CCR 3SET WRITE WRONG DATA PARITY 
CLR aeTSTLOC sWRITE LOCATION WITH BAD DATA PARITY 
CLR ccR sCLEAR WRITE WRONG DATA PARITY 
COM R1 sSET EXPECTING INTERRUPT FLAG 
INTRPC; TST aeTSTLOC sREAD TEST LOCATION 
TST R1 3IF INTERRUPT FLAG NOT EQUAL ZERO 
BEQ 1$ 3 THEN 


ERROR +36 sPARITY INTERRUPT LOGIC DOESN’? WORK 


SEQ 03146 
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104720 
104726 


104730 
104732 
104734 
104740 
104742 
104744 
104746 
104752 
104754 
104756 
104764 
104766 
104774 
104776 


013737 
000424 
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002 762 


001122 


104712 


000340 
000340 


30( 1046 ) 


000114 


177744 
001124 
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1$: 


5$: 


MOV 
BR 
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PARITY INTERRUPT TEST 


ss 8114 


TST1 


G9 


$BDADR 


@INTRPC +4 


MSER 
$GDDAT 


aT ae 114 


3:GO TO NEXT TES 


sIF EXPECTING INTERRUPT FLAG NOT SET 
THEN 


é 

sSAVE INTERRUPT ADDRESS 

oe PARITY INTERRUPT 

3 

sCLEAR CEXPECTING) INTERRUPT FLAG 
— PC NOT EQUAL TO UPDATED PC 
3 

sILLEGAL PARITY INTERRUPT 

a NOT EQUAL TO EXPECTED VALUE 
3 

sSAVE PROPER MSER 

sPARITY INTERRUPT DON’T SET MSER PROPERL + 
;RETURN 


SEQ 0317 


HY 
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17201 .SBTTL TEST - MISCELLANEOUS PARITY TEST 
17202 sMISCELLANEOUS PARITY TEST - THIS TEST CHECKS THAT BYPASS CYCLES WITH 
17203 sPARITY ERRORS CAUSE CACHE HIT RESPONSE AND THAT FORCE MISS CrCLES 
172 ; IGNORE PARITY ERRORS. 
17205 ; 
17206 ;BGNTST 
17207 ;WRITE A LOCATION WITH BAD PARITY 
17208 ;SET BYPASS IN CCR 
17209 ;READ THE LOCATION BACK 
17210 :IF NO HIT OR MSER NOT SET THEN 
17211 ts ERROR 
17212 s;ENDIF 
17213 ;WRITE A LOCATION WITH BAD PARITY AND SET BYPASS 
17214 ;IF MSER SET WHILE READING IT BACK 
17215 Bs ERROR 
17216 s;ENDIF 
17217 sENDOTST 
17218 FEPOMHHAHEHAAESEEEEHEEEESOHESEEEEEEEHEEOESEEEEEEEEEEEEHEHEEEHEEHEOEE 
17219 105000 000004 TST17: SCOPE 
17220 105002 012703 105002 MOV @.,R3 :START WITH CURRENT INSTRUCTION 
17221 105006 005723 108: TST (R3)> ;READ A WORD 
17222 105010 022703 105152 CMP 043 ,R3 ;LAST WORD? 
are 105014 001374 BNE 108 IF NOT, CONTINUE 
‘ Q 
bore ; CHECK BYPASS AND BAD PARITY 
+ 
17227 105016 013737 000114 002762 MOV 90114, SLOCOO ;SAVE PARITY VECTOR 
17228 105024 012737 105060 000114 MOV 01$,80114 sPOINT NEW VECTOR 
17229 105032 052737 002101 177746 BIS OBIT1LO!BITO6!BITOO,CCR ;DATA AND TAG PAR., NO INT. 
17230 105040 005037 003122 CLR @eTSTLOC sWRITE CrCLe 
17231 105044 012737 001000 177746 MOV #BITO9,CCR ;SET BYPASS 
17232 105052 005737 003122 1ST aeTSTLOC ;BYPASS WITH WRONG PARITY 
17233 105056 000410 Re 2s ; 
17234 105060 062706 000004 1%: ADD 04 ,SP sADUUST STACK 
17235 105064 104045 ERROR +45 ;ERROR 
17236 105066 032737 000340 177744 BI! @340,MSER sMSER OK? 
17237 105074 001001 BNE 2s ;IF vES, BRANCH 
Less 105076 104042 ERROR +42 ;BYPASS WRONG 
* a 
foeer 3; CHECK FORCE MISS AND BAD PARITY 
. 
17242 105100 005037 177744 2s: CLR MSER ;CLEAR MSER 
17243 105104 005037 177746 CLR ccr ;CLEAR CCR 
17244 105110 012737 105144 000114 MOV 03$,80114 s;POINT NEW VECTOR 
17245 105116 052737 002101 177746 BIS OBITLOIBITO6!BITVO, “CR ;DATA AND TAG PAR., NO INTER 
17246 105124 005037 003122 CLR aeTsTLoc sFORCE MISS WITH PARITY 
17247 105130 012737 000014 177746 MOV #14,CCR sFORCE MISS 
17248 105136 005737 003122 TST aeTstTLoc sALLOCATE CACHE 
17249 105142 000403 BH 43 
17250 105144 104042 3$: ERROR +42 
17251 105146 062706 000004 ADD 04,SP sADJUST STACK 
17252 105152 005037 177746 4s: CLR ccR ;CLEAR CCR 
17253 105156 013737 002762 000114 MOV SLOCOO 80114 sRESTORE PARITY VECTOR 
17254 105164 012737 000400 177746 MOV #BITO8,CCR 3;FLUSH CACHE 
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-SBTTL TEST - MEMORY SYSTEM ERROR REGISTER TEST 

sMEMORY SYSTEM ERROR REGISTER TEST - THIS TEST WILL VERIFY THE 
sFUNCTIONALITY OF BITS <15> AND <7:5> OF THE MEMORY SYSTEM ERROR 
sREGISTER. THIS TEST WILL USE THE WRITE WRONG PARITY BITS (BITS<10- 
sAND <6> OF THE CCR) TO WRITE BAD PARITY INTO A LOCATION. THE 
sLOCATION WILL THEN BE READ WITH CACHE TRAPS ENABLED AND THE MSER 
;WILL BE CHECKED AFTER THE ABORT FOR THE CORRECT BIT(S) BEING SET. 
sTHIS WILL BE DONE FOR ALL COMBINATIONS OF BITS<10> AND <6> FOR WORD 
sACCESSES THEN REPEATED FOR ALL COMBINATIONS OF BITS<10> AND <6> FOR 
sBYTE ACCESSES. THE TEST WILL THEN BE REPEATED A THIRD TIME FOR BrTE 
sACCESSES AND ABORTS DISABLED. THE MSER SHOULD CONTAIN BITS <7:5> 
3SET TO 1'°S AND BIT <15> A ZERO FOR ALL COMBINATIONS. 


; 

sBGNTST 

sSAVE CONTENTS cr VECTOR 114 

sSETUP VECTOR TO POINT IU ABORT ROUTINE 

s INITIALIZE LOOP COUNTER 

300 UNTIL ALL WORD COMBINATIONS CHECKED 

i. INITIALIZE MSER 

SETUP CCR FROM CCR TABLE 

; READ TEST LOCATION TO ALLOCATE LOCATION WITH DESIRED PARITY 
: CLEAR <10,6> FROM CCR 

3. SETUP CCR FOR ABORT 

3. READ TEST LOCATION sTHIS COULD CAUSE TRAP 
° 

; 

3 


OS APR-84 16:45 P 
Test - 


IF EXPECTED DATA NE RECEIVED DATA THEN 
bow ERROR IN SETTING MSER 


UPDATE LOOP COUNTER 


sENDDO 
s INITIALIZE LOOP COUNTER 
300 UNTIL ALL BYTE COMBINATIONS CHECKED 


3. INITIALIZE MSER 

3. SETUP CCR FROM CCR TABLE 

3. READ TEST LOCATION TO ALLOCATE LOCATION WITH DESIRED PARITY 
Bs CLEAR <10,6> FROM CCR 

3. SETUP CCR FOR ABORT 

3. READ LOW BYTE TEST LOCATION 

3. GET EXPECTED BYTE DATA FROM TABLE 

3. IF EXPECTED DATA NE RECEIVED DATA THEN 
3. ° ERROR IN SETTING MSER 

3. ENDIF 

3. INITIALIZE MSER 

3. READ HIGH BYTE TEST LOCATION 

3. GET EXPECTED BrTE DATA FROM TABLE 

3. IF EXPECTED DATA NE RECEIVED DATA THEN 
8. ber ERROR IN SETTING MSER 

3. 


F 
Se INCREMENT LOOP COUNTER 
;ENDDO 


s INITIALIZE LOOP COUNTER 

300 YNTIL ALL BYTE COMBINATIONS CHECKED 

3. INITIALIZE MSER 

3. SETUP CCR FROM CCR TABLE 

3. READ TEST LOCATION TO ALLOCATE LOCATION WITH DESIRED PARITY 
86 CLEAR «<10,6> FROM CCR 

: SETUP CCR FOR NO ABORTS 


SEG 071% 
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105172 
105174 
105202 
105210 
105214 
105220 
105224 


105274 


105276 
105302 
105306 
105312 


077425 


012704 
012700 
012701 

5037 


000114 002762 
105652 000114 
000004 


105612 
105622 
177744 
177746 
003122 
000200 177746 
003122 
177744 


001124 


023122 


000004 
105612 
105632 
177744 


8. READ LOW BYTE TEST LOCATION 
bs IF RECEIVED DATA NE TO #340 THEN 
3. . ERROR IN SETTING MSER 
Gs ENDIF 

be INITIALIZE MSER 

Se READ HIGH BYTE TEST LOCATION 
Se IF RECEIVED DATA NE #340 THEN 
i. ‘ ERROR IN SETTING MSER 
tis ENDIF 

ds INCREMENT LOOP COUNTER 

sENDDO 

sEXIT TST 


; 
;CCR TABLE: 
; 


ie) 
100 
2000 
2100 


Q 
sEXPECTED WORD DATA: i?) 


; 
sEXPECTED BYTE DATA; to) 


sABORT ROUTINE: RTI 


3 
sENDTST 


BF FSSSASAHSASSHSSEHSESSEESESHESESSEHSEEHESSHESEEEEEHESESHHESESESEEESEEE 


TST20: 


18; 


2s: 


S08 
sCHECK BYTE 


38: 


SCOPE 

MOV @¢114, SLOCOO 

MOV @ABROUT ,80114 

MOV 04, R4 

MOV @CCRIBL RO 

MOV @EXPWOT,R1 

CLR MSER 

MOV CRO)+, CCR 

CLR aeTSTLOC 

MOV #BITO7, CCR 

TST aeTSTLOC 

CMP (RL), MSER 

BEQ es 

MOV (R1), $GODAT 

ERROR +35 

TST (R1)> 

TST @eTSTLOC +8192, 

R4, 1$ 

OPERATIONS —_ 

MOV 04, 

MOV @CCRTBL, RO 

MOV #€ XPBDT ,R1 

CLR MSER 


sSAVE CONTENTS OF VECTOR 114 

sSETUP VECTOR TO POINT TO ABORT ROUTINE 
s INITIALIZE LOOP COUNTER 

;GET ADDRESS OF CCR TABLE 

;GET ADDRESS OF EXPECTED DATA TABLE 

s INITIALIZE MSER DATA 

;SETUP CCR FROM CCR TABLE 

sALLOCATE CACHE LOC. WITH DESIRED PARITY 
;SETUP CCR TO ABORT POSSIBLE BAD PARITY 
sREAD TEST LOCATION 

;IF RECEIVED DATA NOT EQUAL TO EXPECTED 
;DATA THEN 

;SAVE PROPER MSER SETTING 

sMSER NOT SET PROPERLY 

s INCREMENT POINTER THRU MSER TABLE 

3T0 INSURE MISS ON THE NEXT LOOP 

sLOOP UNTIL ALL COMBINATIONS CrECKED 


s INITIALIZE LOOP COUNTER 

sGET ADORESS OF CCR TABLE 

sGET ADDRESS OF EXPECTED BYTE DATA 148. € 
s INITIALIZE MSER 


SEQ 0320 
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17368 105316 005737 003122 TST aeTSTLOC sALLOCATE TO HAVE WRITE BYTE HIT 

17369 105322 011037 177746 MOV (RO), CCR sSETUP CCR FROM TABLE 

17370 105326 105037 003122 CLRB @eTSTLOC sALLOCATE CACHE LOC. WITH DESIRED PARITY 
17371 105332 012737 000200 177746 MOV @B1T07, CCR sSETUP CCR TO ABORT POSSIBLE BAD PARITY 
17372) 105340 105737 003122 TSsT8 aeTSTLOC sREAD LOW BYTE OF TEST LOCATION 

17373 105344 021137 177744 CMP (R1), MSER sIF RECEIVED DATA NOT EQUAL TO EXPECTED 
17374 105350 001403 BEQ $ 3 THEN 

1737S 105352 011137 001124 MOV (R1), $GDDAT ;SAVE PROPER MSER SETTING 

17376 105356 104035 ERROR +35 sMSER NOT SET PROPERLY 

1737? 105360 005721 43: TST (R1)> s INCREMENT POINTER THRU MSER TABLE 
17378 105362 005037 177744 CLR MSER s INITIALIZE MSER 

17379 105366 005737 003122 TST aeTSTLOC sALLOCATE TO HAVE WRITE BYTE HIT 

17380 105372 012037 177746 MOV CRO)+, CCR ;SETUP CCR FROM TABLE 

17381 105376 105037 00312 CLRB @eTSTLOC+1 sALLOCATE CACHE LOC. WITH DESIRED PARITY 
17382 105402 012737 000200 177746 MOV @BITO7, CCR sSETUP CCR TO ABORT POSSIBLE BAD PARITY 
17383 105410 105737 003123 TSTB aeTSTLOC+1 sREAD HIGH BYTE OF TEST LOCATION 

17384 105414 021137 177744 CMP (RL), MSER :TF RECEIVED DATA NOT EQUAL TO EXPECTED 
17385 105420 001403 BEQ S$ 3 THEN 

17386 105422 011137 001124 MOV (R11), $GDDAT sSAVE PROPER MSER SETTING 

17387 105426 104035 ERROR . sMSER NOT SET PROPERLY 

17388 105430 005721 S$; TsT (R1)> ; INCREMENT POINTER THRU MSER TABLE 
17389 105432 077451 S08 R4, 3$ 300 UNTIL ALL BYTE COMBINATIONS CHECKED 
17390 sREPEAT WITHOUT ~ gs 

17391 105434 012704 000003 MOV s INITIALIZE LOOP COUNTER 

17392 105440 012700 105614 MOV eccRrBL +2, RO sGET ADDRESS OF CCR TABLE 

17393 105444 005037 177744 6$: CLR MSER s INITIALIZE MSER 

17394 105450 005737 003122 TST aeTSTLOC sALLOCATE CACHE LOC. 

17395 105454 011037 177746 MOV (RO), CCR ;SETUP CCR FROM TABLE 

1739 105460 105037 003122 CLRB aeTSTLOC sALLOCATE CACHE LOC. WITH DESIRED PARITY 
17397 105464 012737 000001 177746 MOV #BITOO, CCR sSETUP CCR TO NOT ABORT 

17398 105472 105737 003122 TSTB aeTSTLOC sREAD LOW BYTE OF TEST LOCATION 

17399 105476 022737 000340 177744 CMP 0340, MSER sIF RECEIVED DATA NOT EQUAL TO EXPECTED 
17400 105504 001404 BEQ 7$ 3 THEN 

17401 105506 012737 000340 001124 MOV #340, $GDDAT ;SAVE PROPER MSER SETTING 

17402 105514 104035 ERROR +35 sMSER NOT SET PROPERLY 

17403 105516 005037 177744 7$; CLR MSER s INITIALIZE MSER 

17404 105522 005737 003122 TST aeTSTLOC sALLOCATE CACHE LOC. 

17405 105526 012037 177746 MOV CRO)+, CCR ;SETUP CCR FROM TABLE 

17406 105532 105037 003123 CLRB @eTSTLOC +1 sALLOCATE CACHE LOC. WITH DESIRED PARITY 
17407 105536 012737 000001 177746 MOV #BITOO, CCR ;SETUP CCR TO NOT ABORT 

17408 105544 105737 003123 TSsTB @eTSTLOC+1 sREAD HIGH BYTE OF TEST LOCATION 

17409 105550 022737 000340 177744 CMP 0340, MSER sIF RECEIVED DATA NOT EQUAL TO EXPECTED 
17410 105556 001404 BEQ 8s ; THEN 

17411 105560 012737 000340 001124 MOV 0340, $GDDAT sSAVE PROPER MSER SETTING 

17412 105566 104035 ERROR +35 :MSER NOT SET PROPERLY 

17413 105570 077453 8$; S08 R4, 6$ 300 UNTIL ALL BYTE COMBINATIONS CHECKED 
17414 105572 005037 177744 CLR MSER ;CLEAR ERROR REGISTER 

17415 105576 013737 002762 000114 MOV SLOCOO, a#114 sRESTORE VECTOR 114 

17416 105604 005037 177746 CLR CCR sCLEAR ALL BIT IN CCR 

tate 105610 000421 BR TSTel 33GO TO NEXT TEST 

17419 

17420 105612 CCRTBL: .WORD O 

17421 105614 000100 . WORD 100 

17422 105616 002000 -WORD 2000 

17423 105620 002100 WORD 2100 


9 
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COKDAB.P11 05 -APR-84 16:45 TEST ME Y SYSTEM ERROR REGISTER TEST SEQ 0322 
17424 

17425 105622 000000 EXPWOT: .WORD 0 


17429 

17430 105632 000000 EXPBDT: .WORD 0 
17431 105634 000000 «WORD O 
17432 105636 100100 WORD 100100 
17433 105640 100200 -WORD 100200 
17434 105642 100040 -WORD 100040 
17435 105644 100040 -WORD 100040 
17436 105646 100140 WORD 100140 
ios 4 105650 100240 «WORD 100240 
17339 105652 000002 ABROUT: RTI 

17440 


Keohon'e — B CLUSTER peed! 30( 1046) 
O05 -APR - 84 as 


COKDAB 


17442 
17443 
17444 
17445 
17446 
17447 
17448 
17449 
17450 
17451 
17452 
17453 
17454 
17455 
17456 
17357 
17458 
17459 
17460 
17461 
17462 
17463 
17464 
17465 
17466 
17467 
17468 
17469 
17470 
17471 
17472 
17473 
17474 
17475 
17476 
17477 
17478 
17479 
17480 
17481 
17482 
17483 
17484 
17485 
17486 
17487 
17488 
17489 
17490 
17491 
17492 
17493 
17494 
17495 
17496 
17497 


105654 
105656 
105664 
105672 
105700 
105706 
105712 
105716 
105720 
105724 
105732 


012737 
005037 


000004 
000114 
105720 
177400 
177572 
157776 


000004 
000102 
157776 


002762 
002764 
000004 


172354 


177746 


05 - APR - 08 
TEST 
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CHECK ORARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT 


TEST 


- CHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT 


s;CHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT - THIS TEST —_— 
;VERIFY THAT IF A PARITY ERROR OCCURS ON THE SAME ADDRESS REFERENCE AS A 
s;NON-EXISTENT MEMORY ERROR THAT THE CACHE DATA PATH GATE ARRAY BLOCKS THE 
sPARITY ERROR TO THE J-11 CHIP SET. THIS WILL BE DONE BY USING THE a wee 
ere TO CAUSE A PARITY ERROR IN A CACHE REFERENCE THAT DOES NOT HAVE A 


;CORRESPONDING ADDRESS IN MAIN MEMORY. 


THE ADDRESS WILL THEN BE READ CAUSING 


;BOTH A CACHE PARITY ERROR AND A NON-EXISTENT MEMORY ERROR. TO AVOID HAVING 
3TO SIZE THE ENTIRE MEMORY TO FIND A NON-EXISTENT MEMORY ADDRESS THIS TEST 


s;WILL USE THE LARGEST NON-I/0 ADDRESS (17757776). 
;THIS ADDRESS AND IF A NXM TRAP OCCURS THE TEST WILL BE DONE. 


THE TEST WILL FIRST READ 
IF THE ACCESS 


:TO THIS ADDRESS DOES NOT TRAP THEN THE TEST WILL BE SKIPPED. 


;BGNTST 

;SAVE CONTENTS OF VECTOR 4 
;SAVE CONTENTS OF VECTOR 114 
3;LET VECTOR 4 POINT TO CONTINUE TESTING (A: ) 
;LET PAR6 = #177400 
sACCESS ADDRESS 157776 (PHYSICAL 17757776) 


;IF NO TRAP THE 


$e 
3;ENOIF 
3A: 


GOTO ENOTST 


;SET DIAGNOSTIC AND WRITE WRONG PARITY BITS IN CCR 
s;WRITE ADDRESS 157776 


;CLEAR CC 
;SET PARITY ERROR ABORT BIT IN CCR 


sLET VECTOR 4 POINT TO CONTINUE TESTING (B: ) 
s;LET VECTOR 114 POINT TO NXM-PARITY ERROR ROUTINE 
;READ ADDRESS 157776 


;IF NO TRAP THE 


3. 
;ENDIF 


N 


ERROR IN ABORT LOGIC 


3B: 
;CLEAR CCR 


sRESTORE CONTENTS OF VECTOR 114 


sRESTORE CONTENTS OF VECTOR 4 


sEXxIT 
3 


TST 


é 
3NXM-PARITY ERROR ROUTINE: 


. 
‘ 
sENDTST 


RESET STACK AFTER TRAP 
PARITY ABORT NOT BLOCKED BY NXM 


SEAS HAEAEHEAHESEOEEDESEELDESERESEESESEREAEEDEEHEESESEAEEEAEEEEOSE 


TST21: 


1$: 


SCOPE 


SLOCOO 
a114, SLOCO1 
#1$, ava 

#177400, KIPAR6 


#102, CCR 
0157776 


;SAVE CONTENTS OF VECTOR 4 

;SAVE CONTENTS OF VECTOR 114 

;LET VECTOR 4 POINT TO CONTINUE TESTING 
;LET PAR6 = OFFSET TO HIGHEST MEMORY 

3; TURN ON MMU 

sACCESS ADDRESS 17757776 

;IF NO TRAP SKIP TEST 

;RESET STACK AFTER TRAP 

;SET DIAG. AND WRITE WRONG PARITY BITS 
sWRITE TO ADDRESS 17757776 


SEQ 0323 


N9 
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COKDAB.P11 0S -APR-84 16:45 TEST CHECK PARITY ABORTS BLOCKED BY NON-EXISTENT MEMORY ABORT SEQ 0324 
17498 105736 012737 000200 177746 MOV #200, CCR sCLEAR CCR AND SET PARITY ABORT BIT 
17499 105744 012737 105770 000004 MOV #23, 944 sLET VECTOR 4 POINT TO CONTINUE TESTING 
17500 105752 012737 106022 000114 MOV ONXMPAR , 0114 +} VECTOR 114 POINT TO ERROR ROUTINE 
17501 105760 005737 157776 TsT 80157776 READ ADDRESS 17757776 Ne ge TRAP ) 
17502 105764 104037 ERROR +37 ;NXM AND PARITY ABORT DIN’ T HAPPEN 
17503 105766 000402 BR ABOE XT 3GO EXIT TEST 
17504 105770 062706 000004 2s: ADD 04, sP sRESET STACK AFTER TRAP 
17505 105774 005037 177746 ABOEXT: CLR CCR sCLEAR CCR FOR EXIT 
17506 106000 005037 177572 CLR SRO sOISABLE MMU 
17507 106004 013737 002762 000004 MOV SLOCOO, a04 sRESTORE VECTOR 4 
17508 106012 013737 002764 000114 MOV SLOCO1L, 87114 sRESTORE VECTOR 114 
17509 106020 000404 BR TST22 3:GO TO NEXT TEST 
17510 
17511 
17512 
17513 106022 062706 000004 NXMPAR: ADD 04, SP sRESET STACK AFTER TRAP 
17514 106026 104040 ERROR +40 sPARITY ABORT NOT BLOCKED By NXM TRAP 
17515 106030 000002 RTI 


B1O 
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COKDAB.P11 05 -APR 84 16:45 TEST AULT SROeCESSING TNSTRUCT ION TESTS SEQ 0325 
i°si? -SBTTL TEST - MULTIPROCCESSING INSTRUCTION TESTS 
17518 sMULTIPROCCESSING INSTRUCTION TESTS - THIS TEST WILL VERIFY THAT THE MULTI- 
17519 sPROCCESSING INSTRUCTIONS DO A BYPASS OF THE CACHE. THIS TEST WILL NOT VERIF Yr 
17520 + THE REST OF THE FUNCTIONALITY OF THESE INSTRUCTIONS BECAUSE THAT WILL ALREADY 
17821 sHAVE BEEN CHECKED IN THE BASE INSTRUCTION TESTS. THE TEST WILL FIRST ALLOCATE 
17S22 sAN ADDRESS IN CACHE THEN A TSTSET INSTRUCTION WILL BE DONE AT THAT ADDRESS. 
17828 +A HIT SHOULD BE RECORDED ON THE ACCESS. NEXT, THE ADDRESS WILL BE READ AND 
17524 3A MISS SHOULD BE RECORDED BECAUSE THE FORCED BYPASS ON THE TSTSET INSTRUCTION 
1°525 sSHOULD HAVE INVALIDATED THE CACHE ENTRY. THE SAME SEQUENCE WILL THEN BE 
ae sREPEATED FOR THE WRILCK INSTRUCTION. 
‘De 8 
17528 sBGNTST 
17529 sREAD TEST LOCATION TO ALLOCATE CACHE 
175380 300 TSTSET INSTRUCTION 
17531 sIF HWIT/MISS REGISTER BIT 3 NOT SET OR BIT 2 SET THEN 
17532 8. ERROR IN MULTI-PROCESSOR HOOKS 
17538 sENDIF 
17534 sREAD TEST LOCATION (ALSO ALLOCATES CACHE FOR WRILCK) 
17535 300 WRILCK INSTRUCTION 
17536 sIF HIT/MISS REGISTER BIT 3 NOT SET OR BIT O SET THEN 
17537 as ERROR IN MULTI-PROCESSOR HOOKS 
17538 sENOIF 
17539 sREAD TEST LOCATION 
17540 3:00 ASRB INSTRUCTION 
17541 nef HIT/MISS REGISTER BIT 3 NOT SET OR BIT 2 SET THEN 
17542 ERROR IN MULTI-PROCESSOR HOOKS 
17543 SENOIF 
17544 sENOTST 
sehen sNOTE: THE CODE IS POSITION DEPENDENT 
17547 PESSHSSSHSSHSHSHSSSSHSSHHHHSHSHHSHHESHHSHEEHESSHSHHSEHHHEHEHESEESESHEEHEEEEE 
17548 106032 000004 TST22: SCOPE 
17549 106034 042737 001000 177520 BIC @1000,B8CSR sOISABLE HALT ON BREAK 
17550 106042 005737 003122 TsTt TSTLOC sREAD TEST LOCATION TO ALLOCATE CACHE 
17551 3 TSTSET TSTLOC 300 TSTSET INSTRUCTION 
17552 106046 007237 78; WORD 7237 3s THESE NEXT TWO LOCATIONS ARE THE TSTSE’ 
17553 106050 003122 . WORD TSTLOC sINSTR. BECAUSE THE ASSEMBLER WAS NOT RE4D?r 
17554 106052 013737 177752 110504 MOV HITMIS,RECDAT sSTORE REGISTER 
17555 106060 032737 000010 110504 BIT OBIT3S,RECDAT s1F HWIT/MISS REGISTER BIT 3 NO! SET 
17556 106066 001001 BNE ‘ $ 3 THEN 
17557 106070 104045 ERROR 45 sERROR IN RECORDING HITS IN HIT/MISS 
17558 106072 032737 000004 110504 S$: BIT eerr2. RECOAT sIF HIT/MISS REGISTER BIT 2 SET 
17559 106100 001404 BEQ 3; THEN 
7 106102 013737 106046 001126 MOV 5078, sBODAT sSAVE OPCODE 
17561 106110 104041 ERROR 41 sMULTI-PROCESSOR HOOK INSTRUCTION DOESN’ TT CAUSE 
17562 328: WRTILCK 1STLOC 300 WRILCK INSTRUCTION 
17563 106112 007337 2s: «WORD 7337 sTHESE NEXT TWO WORDS ARE THE WRILCK 
17564 106114 003122 - WORD TSTLOC sINSTR, BECAUSE THE ASSEMBLER WAS NOT READ: 
17565 106116 013737 177752 110504 MOV HITMIS,RECDAT sSTORE REGISTER 
17566 106124 032737 000010 110504 BIT . OBIT3,RECDAT sIF MIT/MISS REGISTER BIT & NOT SET 
17567 106132 001001 BNE 3% 3 THEN 
17568 106134 104045 ERROR 45 sERROR IN RECORDING HITS IN AIT Miss 
17569 106136 032737 000004 110504 8%: BIT OBIT2,RECDAT sIF MIT“MISS REGISTER BIT 2 SE’ 
17570 106144 001404 BEQ 43% 3 THEN 
17571 106146 013737 106112 001126 MOV a2, SBODAT sSAvE OFCODE 


17572 106154 104041 ERROR *41 sMUL TL -PROCESSOR MOUK INSTRUCTION DOESN TT 2a it 


CLO 
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COKDAB.P11 OS -APR-84 16:45 TEST - MULT CESSING INSTRUCTION TESTS SEQ 0326 
1°S73) 106156 106237 003122 4$; ASRB TSTLOC sTHE THIRD BYPASS INSTRUCTION 
17574 106162 013737 177752 110504 MOV HITMIS,RECDAT sSTORE REGISTER 
1757S 106170 032737 000010 110504 BIT OBITS,RECDAT sIF HIT/MISS REGISTER BIT 3 NOT SET 
7576 106176 001001 BNE 5$ s THEN 
17577? 106200 104045 ERROR 045 sERROR IN RECORDING HITS IN HIT/MISS 
17578 106202 052737 001000 177520 5$: BIS #1000,B8CSR sENABLE HALT ON BREAK 
17579 106210 032737 000004 110504 BIT OBIT2,RECDAT sIF MIT/MISS REGISTER BIT 2 SET 
17580 106216 001404 BEQ TST23 ssEXIT TEST 
17581 106220 013737 106156 001126 MOV 9043, $BODAT sSAVE OPCODE 
seek 106226 §=104041 ERROR °41 sMUL TI -PROCESSOR HOOK INSTRUCTION DOESN’ TT CAUSE 
Be 
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106230 000004 
106232 004737 152156 
106236 012737 002000 


CLUSTER MACY11 30( 1046) 


172354 


D1O 
reer” Bara Store RAM Tests 


-SBTTL TEST - DATA STORE RAM TESTS 

sDATA STORE RAM TESTS - THERE ARE TWO TESTS FOR THE DATA STORE RAM, 
sTHE FIRST TEST WILL BE A NO DUAL ADDRESSING TEST AND THE SECOND 

sTEST WILL BE A DATA RELIABILITY TEST. THE NO DUAL ADDRESSING TEST 
sWILL FIRST WRITE EACH WORD OF THE CACHE RAM WITH ITS WORD ADDRESS 
sAND VERIFY THE CONTENTS WITH A READ OF EACH ADDRESS. THEN EACH 

sBYTE WILL BE WRITTEN WITH ITS ADDRESS AND CHFC ©. [HE DATA 
sRELIABILITY TEST THAT WILL BE USED IS A TESI CA! EO MOVING INVERSIONS. 


‘ 

sBGNTST 1 

‘ean MMU REGISTERS TO HAVE BYPASS ON KERNAL .PATE 4ND NO 
BYPASS ON USER SPACE 

}LET PS EQUAL KERNAL FOR CURRENT MODE AND USER + OR PREVIOUS 

é MODE 


sENABLE MMU 

;GET FIRST ADDRESS OF 4K WORD DATA BUFFER 
sCLEAR DATA TO BE WRITTEN 

sSET DIAGNOSTIC BIT (BIT<1>) IN CCR 

:00 UNTIL DATA TO BE WRITTEN EQUALS 20000(8) 


3. WRITE DATA TO ADDRESS 
3. ADD 2 TO ADDRESS 
3. ADD 2 TO DATA TO BE WRITTEN 


sENODO 

3;GET FIRST ADDRESS OF 4K WORD DAIA BUFFER 
sCLEAR EXPECTED DATA 

300 UNTIL agp Fe EQUALS 20000( 8) 


3. READ ADORE 

3. IF RECEIVED DATA NE EXPECTED DATA THEN 

3. . GOTO DATA STORE PARITY ERROR ROUT INE 
3. ENOIF 

3. ADD 2 TO EXPECTED DATA 

3. ADD 2 TO ADDRESS 


sENDDO 

;GET FIRST ADDRESS OF 8K BYTE DATA BUFFER 
;CLEAR DATA TO BE WRITTEN 

300 UNTIL ALL BYTES CHECKED 


$. WRITE DATA TO ADDRESS 
3 ADD 1 TO ADDRESS 
3. ADO 1 TO DATA TO BE WRITTEN 


sENDOO 

3GET FIRST ADDRESS OF 8K BYTE DATA BUFFER 
;CLEAR EXPECTED DATA 

300 UNTIL EXPECTED DATA EQUALS 20000( 8) 

Rs READ ADDRESS 

is IF RECEIVED DATA NE EXPECTED DATA THEN 
3. . GOTO DATA STORE PARITY ERROR ROUTINE 
- ENDIF 

Be ADD 1 TO EXPECTED DATA 

H ADD 1 TO ADDRESS 


sENDTST 
3 
FF SHSSHSSHEHHSEHEHSSHEHESHSHESESSESESEHEEHEEHESSHEHEHESEEHEHEHEESEHEEEEEHEHHEEEED 
TST23: SCOPE 
JSR PC, INI TMM sSETUP MMU REGISTERS 
MOV #2000, KIPARe sLET PARG MAP TO ADDRESS 200000 


SEQ 04327 


COKDABO KDJ11-B CLUSTER MACY11 
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17642 
17643 
17644 
17645 
17646 


OS -APR-84 16:45 


177572 
140000 


000002 


001000 
020000 


000001 


001000 
177572 


30( 1046) 


177746 
17.520 


177746 


001122 


001160 
001160 


177746 


177746 


001122 


001160 
001160 


177520 


0S - wa 84 
TEST 


2s: 


3$; 


100$: 


4$; 
S$: 


6$: 


7$: 


101$; 


9%: 
10%: 


E10 


16:45 PAGE 3529 


DATA STORE RAM TESTS 


SRO 
#140000 ,R2 
R1 
#BITO1, CCR 
#1000,BCSR 
Rl, #20000 
es 
Rl, (R2)> 
2, R1 
1% 
@BITO1, CCR 
#140000 ,R2 
R1 
R1, #20000 
5$ 
R1 $BDADR 
oBIT15, $sBDADR 
(R2)+, RECDAT 
HITMIS, $TMPO 
OB ITO4, $TMPO 
100$ 

«45 
Rl, RECDAT 
as 

+43 
os" R1 
_ R2 
SerTOL. pen 
+f 
al, CR2)> 
1, R1 
6$ 
BITO1, CCR 
 {rtataataas 

1 
Rl, 20000 
10% 
Rl, $BDADR 
oBIT15, sBDADR 
(R2)+, RECDAT 
HITMIS, $TMPO 
oBITO4, $TMPO 
101$ 

°45 
Rl, RECDAT 
9$ 

043 
ol, R1 
8$ 
#1000 ,BCSR 
SRO 


sTURN ON MEMORY MANAGEMEN 

sGET FIRST ADDRESS OF 4K WORD BUFFER 
sINIT DATA TO BE WRITTEN 

sSET DIAG BIT IN CASE NO MEMORY PRESENT 
sOISABLE HALT ON BREAK 

s00 UNTIL ALL ADDRESSES WRITTEN 

sIF DONE GO CHECK DATA 

sWRITE DATA TO ADDRESS 

fot ly DATA BY 2 (WORD BOUNDARY ) 


é 

sCLEAR DIAGNOSTIC BIT 

sGET FIRST ADDRESS OF 4K WORD BUFFER 
sINIT DATA TO BE CHECKED 

300 UNTIL ALL ADDRESSES CHECKED 

sIF DONE GO DO BYTES 

sSTORE FOR ERRORS 


3 

sREAD TEST LOCATION 

s;STORE REGISTER 

sHIT? 

:IF YES, BRANCH 

;DATA RAM ERROR 

ee DATA NOT EQUAL TO EXPECTED 


ti 

sDATA RAM ERROR 

sUPDATE EXPECTED DATA BY 2 

sENDDO 

sGET FIRST ADDRESS OF 4K WORD BUFFER 
sINIT DATA TO BE WRITTEN 

sSET DIAG BIT IN CASE NO MEMORY PRESENT 
3:00 UNTIL ALL ADDRESSES WRITTEN 

sIF DONE GO CHECK DATA 

sWRITE DATA TO ADDRESS 

sUPDATE DATA By 1 (BYTE BOUNDARY ) 
sENDDO 

sCLEAR DIAGNOSTIC BIT 

sGET FIRST ADDRESS OF 4K WORD BUFFER 
sINIT DATA TO BE CHECKED 

3D0 UNTIL ALL ADDRESSES CHECKED 

sIF DONE EXIT TEST 

sSTORE FOR ERRORS 


3 

sREAD TEST LOCATION 

;STORE REGISTER 

sHIT? 

sIF YES, BRANCH 

;DATA RAM ERROR 
Fee DATA NOT EQUAL TO EXPECTED 
3 

:DATA RAM ERROR 

sUPDATE EXPECTED DATA BY 1 
sENDDO 

sENABLE HALT ON BREAK 

3; TURN OFF MMU 


SEQ 0328 
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F10 
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TEST - TAG STORE RAM TESTS 


-SBTTL TEST - TAG STORE RAM TESTS 

;TAG STORE RAM TESTS - THERE ARE TWO TESTS FOR THE TAG STORE RAMS. THE FIRST 
;TEST IS AN ADDRESSING TEST TO ENSURE NO DUAL ADDRESSING OF THE TAG STORE. 
oat ton si A “MOVING INVERSIONS” TEST THAT CHECKS THE DATA RELIABILITY 
‘ 


; 

sDUAL ADDRESSING TEST - THIS WILL BE DONE BY FIRST FLUSHING THE CACHE, THEN 
sTHE FIRST 512(10) LOCATIONS (BLOCK 0) WILL BE WRITTEN WITH ADDRESSES THAT 
;WILL CAUSE A INCREMENTiNG PATTERN TO BE STORED IN THOSE LOCATIONS OF THE TAG 
sSTORE RAM, NEXT THE ENTIRE 4K ADDRESS RANGE WILL BE READ. THE HIT/MISS 
sREGISTER SHOULD ONLY REPORT HITS ON THE ADDRESSES THAT WERE ALLOCATED. THIS 
sPROCESS WILL BE REPEATED FOR EACH BLOCK. 


& 

s INITIALIZE LOW ADDRESS 

;SETUP AND ENABLE MMU 

s INITIALIZE BLOCK COUNTER 

300 UNTIL ALL BLOCKS TESTED (8 TIMES) 

FLUSH CACHE AND SET DIAGNOSTIC BIT 

LET CURRENT ADDRESS = LOW ADDRESS 

INITIALIZE ALLOCATION COUNTER 

DO UNTIL ENTIRE BLOCK ALLOCATED (1000 TIMES) 
i on READ CURRENT ADDRESS 

L 


. WRITE CURRENT ADDRESS 
ENOIF 


UPDATE CURRENT ADDRESS (ALSO ADD 200 TO PAR) 
FOR I/0 PAGE WRITE THE SAME ADDRESS AS BEFORE 


ENDDO 
INITIALIZE GOOD ADDRESS 
INITIALIZE CURRENT ADORESS 
INITIALIZE LOCATION COUNTER 
SAVE CONTENTS OF VECTOR 114 
LET VECTOR 114 POINT TO TAG STORE PARITY ABORT ROUTINE 
DO UNTIL ALL LOCATIONS CHECKED (1000 TIMES) 
. INITIALIZE CHECK COUNTER 
DO UNTIL ADDRESS IN EACH BLOCK CHECKED 
° READ CURRENT ADDRESS 


* HIT THEN 
IF CURRENT ADDRESS NE GOCD ADDRESS THEN 
ERROR 
° ENDIF 
ELSE 
‘ IF — a EQUAL GOOD ADDRESS THEN 
. ENDIF 
ENDIF 


UPDATE GOOD ADDRESS (ADD #2) 
° UPDATE CURRENT ADDRESS 
ENDDO 


UPDATE LOW ADDRESS (ADD 22000) 


eo @2 Gs Ge GF Ge Ge Ge G2 Ge Gs Ge Gs Gs Ge Gs GF Ge Ge GF Ge Gs GF Ge GF Ge Ge GH Gs GF Ge oF oF 
“ee © © © © © © © © © © © © © © © © © © © © © ee © © Fe ee 


F ENDDO 
;ENDDO 


sOI1SABLE MMU 
sRESTORE VECTOR 114 
sENDTST 


SEQ 0329 


COKDABO KDJ11 B CLUSTER MACY11 
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107136 
107144 


OS - APR 


052737 


-84 16:45 


110524 


110524 


001000 
000004 


30( 1046) 


001160 
000004 
002 766 
172516 
003114 
177520 
177746 
110524 
003112 
172354 
172314 


172314 


110524 
172354 
172354 
172354 
177746 
002770 


110524 


001122 
177746 


110504 
110504 


002770 
002770 


524 
746 


= 
ne 
~OoO 


05 -APR-84 
TEST 
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- TAG STORE RAM TESTS 


FP PESSSSHSSHAHASHEHEASHEHSESHEAEEESEEHEEESEEEEEEEEEEEEEEEEESEEEEESEEESOAEEDSE 


TST24: 


2s: 


338; 
4$: 


10%: 


5$: 
6$: 


7$; 


SCOPE 


3 
oBIT15,KIPDR6 
@CURADD ,R2 
@BIT15,KIPOR6 
— 


#200, KIPAR6 
#177600 ,KIPAR6 
10$ 
#200 ,K IPAR6 
ALLCTR 


es 
“BITo2, CCR 
LOWADD, GOODAD 


160000, $BDADR 
eBITO2, CCF 
@CURADD 
MITMIS, RECDAT 
oBIT2, RECOAT 


7$ 

CURADD, GOODAD 
8s 

46 

8$ 

CURADD, GOODAD 
8s 

+47 


#1000, CURADD 
#BITO2, CCR 


sSTORE TIMEOUT VECTOR 

sPOINT NEW 

sINITIALIZE LOW ADDRESS (USE PAR6) 
sINITIALIZE MMU 

sENABLE MMU 

sENABLE 22-BIT MAPPING 

300 UNTIL ALL BLOCKS TESTED 

300 IN 2 WORDS TO AVOID PMI MEMORY 
sDISABLE HALT ON BREAK 

;SET UP PAR6 FOR THIS TEST 

3FLUSH CACHE AND SET DIAG BIT 

sGET FIRST ADDRESS IN CURRENT BLOCK 
3:00 UNTIL ALL ADDRESSES ALLOCATED 
_— LESS THAN 32k 

iSET BYPASS 

;STORE CURRENT DATA 

sALLOCATE NEXT ACCESS 

sWRITE ALLOCATE 

sELSE 

sWRITE CURRENT ADDRESS 

sUPDATE CURRENT ADDRESS 


sREACHED I/0 PAGE? 

;BRANCH IF NOT 

;00N‘ T UPDATE PAR FOR I/0 PAGE 
;IF ALL ADDRESSES ALLOCATED 
sENDOO 

sRUN WITH FORCE MISS 

s INITIALIZE GOOD ADDRESS 


é 
;GET FIRST ADDRESS 
sSTART WITH 1 OR 2 LOCATION 


é 
sMAKE SURE ON THE RIGHT BOUNDARY 
300 UNTIL ALL LOCATIONS CHECKED 


:00 UNTIL ADDRESS IN EACH BLOCK CHECKED 


3IN CASE OF ERRORS 
;CLEAR PAR BITS 
;CLEAR FORCE MISS 
sREAD CURRENT ADDRESS 
;STORE REGISTER 
_— WAS A HIT 


;IF CURRENT ADDRESS NOT EQUAL TO GOOD 


sADDRESS THEN 
sERROR IN TAG STORE 


a 
IF CURRENT ADDRESS EQUAL GOOD ADDRESS 


3; THEN 

sERROR IN TAG STORE 
sUPDATE TO NEXT BLOCK 
sRUN WITH FORCE MISS 


SEQ 0330 


COKDABO KDJ11 8B CLUSTER MACY11 30(1046) 05-APR- 
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COKDAB P11 


107152 
107156 
107160 
107166 
107174 
107202 
107206 
107210 
” 107216 
7818 107222 
7819 107226 
7820 107230 


110500 


002770 
110524 
172354 


177520 
002766 


177746 


000004 
172516 


30$: 


15$: 


20: 


84 
TAG 


H1LO 


16:45 PAGE 332 
STORE RAM TESTS 


OCOUNT 
6$ 


SEQ 0331 
sIF ADDRESS NOT CHECKED FOR EACH BLOCK 
ENDDO 


3 
sUPDATE GOOD ADDRESS 
s INCREMENT IN 2 WORDS 


sIF ALL ADDRESSES CHECKED 
ENODO 


6 

sENABLE HALT ON BREAK 

sPREPARE FOR THE 2ND PASS THRU 
sDONE TWICE? 

sIF SO, EXIT 


sUPDATE TO NEXT BLOCK TO BE ALLOCATED 
sIF ALL BLOCKS WERE TESTED 


> 

sENODO 

sCLEAR DIAGNOSTIC BIT 
sDISABLE MMU 

sRESTORE TIMEOUT VECTOR 
sENABLE 22-BIT MAPPING 


3:GO TO NEXT TEST 


COKDARO KDJ11 B CLUSTER MACY11 80( 1046) 
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107306 
107310 
107316 
107322 
107324 
107330 
107332 
107336 
107342 
107350 
107356 
107364 
107372 
107376 
107404 
107412 
107416 
107420 
107422 
107426 


O05 -APR -84 16:45 


012706 
010237 


000400 
107316 


107422 


001000 
107376 


001100 
000004 


177746 


000004 


000006 
177520 
177520 


177520 
177520 


05 - APR -84 


TEST 


- SBTTL 
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TEST - STANDALONE MODE TEST 


sTHIS TEST VERIFIES THAT NMX CAN BE CREATED IN STANDALONE MODE. 


: 

sALLOCATE INSTRUCTIONS IN CACHE 
sGUARANTEE MISS ON TEST LOCATION 

3 IN STANALONE MODE ACCESS TEST LOCATION 


3IF NO TIMEOUT THEN 


i. 
sENDIF 


ERROR 


FE FSSSAHESHHSHAHSEHSHASASEOHSESEEEESEEEEEEEOHESEEEEEEESESESEEEHHEEEEEHEEEEES 


TST25: 


18: 


5$: 


108: 


SCOPE 


9400,CCR 
#,,R1 


©B1T09,8CSR 
#BITO8,BCSR 


900 
®BITO8,BCSR 
#BITO9,BCSR 
@S$,(SP) 
10$ 

+44 
#1100, SP 
R2,a04 


sFLUSH CACHE 
sSTART WITH CURRENT INSTRUCTION 
sREAD A WORD 


ONE ? 
3IF NOT, CONTINUE 
;TO GUARANTY MISS ON O 
;STORE TIMEOUT VECTOR 
sPOINT NEW TO THE TEST 
sAT PRIORITY 7 
;OISABLE HALT ON BREAK 
3GO TO STANDALONE MODE 
sMISS, SHOULD TIMEOUT 
sCLEAR STANDALONE BIT 
sENABLE HALT ON BREAK 
3; TIMEOUT? 
:IF YES, BRANCH 


sRESTORE STACK 
sAND TIMEOUT VECTOR 


SEQ 9332 
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OS-APR-84 16:45 PAGE 334 
TEST - MOVING INVERSIONS TEST FOR DATA RAMS 


-SBTTL TEST - MOVING INVERSIONS TEST FOR DATA RAMS 

sMOVING INVERSIONS TEST FOR DATA RAMS - THE TEST IS STARTED AFTER LOADING THE 
sRAM STORE WITH O'S. EACH ADDRESS IS READ AND VERIFIED TO BE ALL O'S. THEN A 
31 IS SUBSTITUTED IN A BIT POSITION AND THE NEW WORD IS WRITTEN. NEXT THE 
sADDRESS IS READ TO VERIFY THE NEW CONTENTS. THIS IS REPEATED FOR EACH BIT OF 
3 THE WORD LEAVING THE ARRAY FILED WITH 1'S. THE WHOLE PROCESS IS REPEATED 


sPLUGGING IN 0’S TO THE 1'S AND REPEATED TWICE MORE ADDRESSING IN THE DOWNWARD 


sDIRECTION. FINALLY EVERYTHING IS REPEATED FOR EACH BIT POSITION BEING THE 
;LSB. TO SAVE TIME AND KNOWING THE LAYOUT OF THE RAM CHIPS INSTEAD OF DOING 
sONLY A SINGLE BIT AT A TIME EVERY FOURTH BIT WILL BE DONE CONCURRENTLY. 
;THIS TEST RUNS IN STANDALONE MODE. 


8 

sBGNTST 

;SETUP AND ENABLE MMU 

;SETUP CCR TO ABORT PARITY ERRORS 

;CLEAR CACHE 

300 IN STANDALONE MODE FOR EACH HALF SEPARATELY 
sLET FWOSEQ = 41 

sLET ADDLSB = 1 

3:00 UNTIL ADDLSB EQ #20000 


3. LET CURDAT = O 

Ss LET RITEDA = 41 

8. LET NEWDAT = 41 

8. IF FWOSEQ = @1 THEN 

3. ° LET FSTADD EQUAL FIRST ADDRESS OF 4K BYTE BUFFER 
3. ‘ os LET LASTAD EQUAL LAST ADDRESS OF 4K BYTE BUFFER 

3. A. 

Se ° LET FSTADD EQUAL LAST ADORESS OF 4K BYTE BUFFER 

Se barr LET LASTAD EQUAL FIRST ADDRESS OF 4K BYTE BUFFER 
3. 

S- LET CURADD = FSTADD 

3. LET DCOUNT = 40 

3. SAVE CONTENTS OF VECTOR 114 

8. LET VECTOR 114 POINT TO DATA STORE PARITY ABORT ROUTINE 

Ss - UNTIL OCOUNT EQ #10 

Bs LET RECDAT = @CURADD 

Ss ‘ IF RECDAT NE CURDAT THEN 

“ ° * LET R1 EQUAL CURRENT DATA 

‘ ° boner GOTO DATA STORE PARITY ERROR ROUTINE 


. IF DCOUNT GT #3 THEN 
. ° LET @CURADD = ACURADD CLEARBY RITEDA 


ELSE 

. _— LET @CURADD = @CURADD SETBY RITEDA 
LET RECDAT = @CURADD 

IF RECDAT NE NEWDAT THEN 

. ° LET R1 EQUAL NEW DATA 

. _— GOTO DATA STORE PARITY ERROR ROUTINE 
. If CURADD EQ LASTAD THEN 

. IF RITEDA = #210 THEN 

° . IF DCOUNT NE #7 THEN 

. : . LET CURDAT = #377 

. . . . LET RITEDA = #1 

. . . . LET NEWDAT = #376 


SEQ 0333 


COKDABO KDJ11 
COKDAB.P11 


107432 
107434 
107442 
107444 
107450 
107456 
107462 
107470 
107474 
107502 


107510 
107514 
107520 
107524 
107526 


3) 
os 
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000004 
032777 
001002 
000137 
042737 
004737 
012737 
005237 
052737 
013737 


012703 
012704 
012705 


000406 
012703 


000200 
110526 


157777 
150000 


071476 


177520 
172354 


177746 
001160 


05 - APR - 
TEST - 


sENDTST 


K10 


IF FWOSEQ = #1 THEN 


LET CURADD = CURADD + ADDLSB 
IF CARRY THEN 
LET CURADD = CURADD + #1 
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° . : ENOIF 

. . ELSE 

. . . LET CURDAT = NEWDAT 

. . . ROTATE RITEDA 

: ° ° IF DCOUNT GT #3 THEN 

: . . és oe LET NEWDAT = NEWDAT CLEAREDBY RITEDA 
. . . . LET NEWDAT = NEWDAT SETBY RITEDA 
. ° ° ENDIF 

. . ENDIF 

. . INCREMENT DCOUNT 

° és os LET CURADD = FSTADD 

. L 


ENDIF 


ENOIF 

NDDO 

IF FWOSEQ EQ #1 THEN 

. LET FWOSEQ = #0 
ELSE 


ROTATE ADDLSB 
° LET FWOSEQ = #1 
ENOIF 


;ENDDO 
at dey VECTOR 114 


ENDIF 


LET CURADD = CURADD - ADDLSB 

IF CARRY THEN 

° LET CURADD = LASTAD - ADDLSB 
‘ LET CURADD = CURADD - #1 
ENDIF 


FF SFSAASSHHASSEASSHHSEEESEEESESESEEHEEEHAEASEHEEAESEEEAAEAEEEREEEEDEEED 


TST26: 


100$: 


SCOPE 

BIT BITO7,@SWR 

BNE 100$ 

JMP ENDMOV 

BIC #1000,BCSR 

JSR PC, INI TMM 

MOV #2000 ,KIPAR6 

INC SRO 

BIS #2, CCR 

MOV a4, $TMPO 
é 
sSTORE TEST IN THE FIRST 2k AND 
é 

MOV #140000 ,R3 

MOV #150000 ,R4 

~ #157777,R5 


1$: 


es 
MOV #150000 ,R3 


sRUN THIS TEST? 

sIF SET, GO DO IT 
sOTHERWISE, GO TO NEXT TEST 
;OISABLE HALT ON BREAK 
3SETUP MEMORY MANAGEMENT 
sSTART ON 32K BOUNDARY 


; TURN ON MMU 
;SET DIAG. BIT 
sSAVE 4 


THEN IN THE SECOND 2k 
sSTART FOR THE TEST 
sLOWER BOUNDARY TEST AREA 
sHIGH BOUNDARY TEST AREA 


;START OF THE TEST 


SEQ 0334 


COKDABO KDJ11-B8 CLUSTER MACY11 


COKDAB .P11 


05 -APR-84 16:45 
140000 


147777 
107662 


110526 


004000 


110504 
001122 
140000 


150000 
001000 
001160 
000400 
177572 
110526 
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001122 


177520 
000004 
177746 


000502 
000444 


23: 
3$; 


4$: 


S$: 
6$: 


L.10 
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-DSABL AMA 


STMOVI: 


TSTLUP: 


BIS 
CLR 


REWRITE 


MOV 
BIC 


#140000 ,R4 
#147777,R5 
@STMOVI,Re 
R3,RO 
CR2)+,CRO)>+ 
#ENDMOV ,R2 
3$ 
R4,RO 
CRO)>+ 
Rl, re 
PC,CR3) 

Ro 

S$ 

RO,RECDAT 

R2, $BDADR 
#140000, $BDADR 
+43 

6$ 

+ (enaaee 


1 
#BITO9,BCSR 


R1 


#BITO8,8#BCSR 
Re 


#1, FWOSEQ 
#1, ADOL SB 
#100000 , 8&K IPDRO 
&KDPARO , 804 


#6, @eKDPARO 


R4,FSTADD 
ne 


RS.FSTADD 
R4,LSTADD 
FSTADD, CURADD 
DCOUNT 

#10, DCOUNT 
ENDTLP 


TIMEOUT VECTOR 


CURADD, RO 
#170000 ,RO 


sLOWER BOUNDARY TEST AREA 
sHIGH BOUNDARY 

;START WITH CURRENT 

sMOVE TO UPPER 4K 

;WORD BY WORD 

sALL DONE 


é 
sCLEAR CACHE UNDER TEST 


3GO DO THE ROUTINE 
sANY ERRORS? 

sIF NOT, CONTINUE 
sDATA RECEIVED 
sADORESS RECIEVED 
sSTRIP OF PAR BITS 


Hy 

3EXIT 

;DONE FOR BOTH HALVES? 
;IF NOT, DO AGAIN 
sENABLE HALT ON BREAK 
sRESTORE TIMEOUT VECTOR 
sINIT CCR FOR EXIT 
;TURN OFF MMU 

3GO TO NEXT TEST 


;STANDALONE MODE 

sERROR INDICATOR 

; INIT UPWARD ADDRESSING INDICATOR 
sINIT LSB AND DO LOOP UNTIL SHIFTED OuT 
3NO BYPASS 

sALLOCATE TIMEOUT VECTOR 

3AT PRIORITY 7 

;PUT RETURN 

;BYPASS 

; INIT CURRENT DATA 

sINIT DATA TO BE WRITTEN 

sINIT EXPECTED DATA 
—n UPWARD 


F 

;LET FIRST ADDRESS EQUAL LOWEST VALUE 
Te ADDRESS EQUAL HIGHEST VALUE 
3EL 

sLET FIRST ADDRESS EQUAL HIGHEST VALUE 
;LET LAST ADDRESS EQUAL LOWEST VALUE 
sLET CURRENT ADDRESS EQUAL FIRST ADDRESS 
; INIT LOOP COUNTER 

300 LOOP 8 TIMES (4 TIMES TO WRITE 1°S 
s;AND 4 TIMES TO WRITE BACK O'S) 


;STORE CURRENT ADDRESS 
sLEAVE ONLY LOW 4K BITS 


SEQ 0335 


COKDABO KDJ11-8 CLUSTER MACY11 
COKDAB.P11 


110370 


117767 


166767 


84 16:45 


000004 
000005 
000006 
000007 


007777 
000114 
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000374 
000400 


000342 
000356 
000346 
000320 
000322 
000314 
000274 
000252 
000260 
000246 
000242 


000234 


000176 
000202 
000172 
000170 


000152 


000136 
000126 


M10 
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cmMP 04, RO 
BEQ 8$ 
CMP #5, RO 
BEQ 8$ 
CMP 06, RO 
BEQ 8$ 
CMP 7, RO 
BEQ 8$ 


; 
;CHECK PATTERNS NOW 


1$: 


S$: 


9$: 


MOV CURDAT, R1 
MOVB @CURADD ,RECDAT 
CMPB RECDAT, CURDAT 


MOV NEWDAT, R1 

CMP 03, OCOUNT 
BGE es 

BICB RITEDA, ACURADD 
BR 3$ 


BISB RITEDA, QCURADD 
MOVB @CURADD ,RECDAT 
CMPB RECDAT, NEWDAT 


JMP 
CMP CURADD, LSTADD 


CMP #210, RITEDA 
BNE S$ 

CMP 7, OCOUNT 
BEQ 7$ 

MOV 0377, CURDAT 
MOV #21, RITEDA 
MOV #356, NEWDAT 
BR 7$ 

MOV NEWDAT, CURDAT 
CLC 

ROLB RITEDA 

ADC RITEDA 

CMP 3, OCOUNT 
BGE 6$ 

BIC RITEDA, NEWDAT 
BR 7$ 

BIS RITEDA, NEWDAT 
INC DCOUNT 

MOV FSTADD, CURADD 
BR 10$ 

TST ae 

BEQ 

ADD ADDLSB, CURADD 
CMP RS ,CURADD 

BGE 10$ 

SUB #7777, CURADD 
BR 10$ 

SUB ADDLSB, CURADD 


sTIMOUT VECTOR? 
sIF SO, DON’T REWRITE IT 
é 


sMOVE GOOD DATA TO R1 

sFIRST READ LOCATION 

;IF RECIEVED DATA NOT EQUAL TO EXPECTED 
;DATA THEN — 

sEXIT TEST 

sMOVE GOOD DATA TO R1 

;IF LOOP COUNT GREATER THAN 3 


3; THEN 
— TEST DATA BY WRITE DATA 


sEL 

;SET TEST DATA BY WRITE DATA 

300 READ AFTER WRITE 

3;IF RECIEVED DATA NOT EQUAL TO EXPECTED 
;DATA THEN 

sEXIT TEST 

_—_— ADDRESS EQUALS LAST ADDRESS 
3 

;AND IF WRITE PATTERN EQUALS LAST 
sPATTERN THEN 

s;AND TEST IS NOT ON LAST LOOP 


3; THEN 
;SET UP TO WRITE O'S 


sELSE 
;SET UP FOR NEXT DATA PATTERN 


;GET A PATTERN 
;AND IF DOWNWARD ADDRESSING 


3; THEN 

gees BE CLEARED BY WRITE DATA 
sEL 

;LET NEWDAT BE SET BY WRITE DATA 
sUPDATE LOOP COUNTER 

;sREINIT FIRST ADDRESS FOR THIS PASS 


sELSE 

1TF ADDRESSING UPWARD 

;CALCULATE NEXT HIGHER ADDRESS 

:IF CURRENT ADDRESS HAS BEEN INCREASED 
;ABOVE HIGHEST ADDRESS THEN 

sROLL ADDRESS BACK 


;ELSE 
;CALCULATE NEXT LOWER ADDRESS 


SEQ 0336 


COKDABO KDJ11-B CLUSTER 
05 - APR - 84 


COKDAB. 


Pil 


110376 
110402 
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000122 
007777 


000112 


000036 


177520 


108: 


ENDTLP: 


1$: 


ENDLUP ; 


EXBAD: 


EXITST: 


- ENABL 


DCOUNT: 
EXPDAT: 
RECDAT: 
FWOSEQ: 


ADOLSB: 

RITEDA: . 
NEWDAT: . 
CURDAT : 
FSTADD: 
LSTADD: 
CURADD : 


ENDMOV: 


N1O 
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R4 = 
CURADD 


coooooooo°0o 


sIF CURREN] ADORESS HAS BEEN DECREASED 
sBELOW LOWEST SDDRESS THEN 
sROLL ADDRESS BACK 


sENDDO 

ee UPWARD FINISHED 
3 

300 ADDRESSING DOWNWARD 


sSET ADDRESSING UPWARD INDICATOR 
sUPDATE LSB TO NEXT POSITION 
sALL DONE? 

sENDDO 


sSTORE RECEIVED DATA 
sSTORE ADDRESS 
sOUT OF STANDALONE 


sSTORES EXPECTED (GOOD) DATA FOR COMPARISONS 
sSTORES RECIEVED DATA TO BE VERIFIED 

sUSED TO INDICATE DIRECTION OF ADDRESSING 
sSTORES LEAST SIGNIFICANT BIT FOR RAM TESTS 
;STORES WRITE DATA FOR RAM TESTS 

;DATA STORE FOR RAM TESTS 

sDATA STORE FOR RAM TESTS 

sSTORES FIRST ADDRESS IN ADDRESSING SEQUENCE 
sSTORES LAST ADDRESS IN ADDRESSING SEQUENCE 
sSTORES CURRENT ADDRESS FOR RAM TESTS 


. 
cl 
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-SBTTL TEST - MOVING INVERSIONS TEST FOR TAG STORE 

sMOVING INVERSIONS TEST - THE TEST IS STARTED AFTER LOADING THE RAM STORE 
sWITH O'S. EACH ADDRESS IS READ AND VERIFIED TO BE ALL O'S, THEN A 1 IS 
sSUBSTITUTED IN A BIT POSITION AND THE NEW WORD IS WRITTEN. NEXT THE ADDRESS 
sIS READ TO VERIFY THE NEW CONTENTS. THIS IS REPEATED FOR EACH BIT OF THE 
sWORD LEAVING THE ARRAY FILED WITH 1'S. THE WHOLE PROCESS IS REPEATED PLUGGING 
sIN 0’S TO THE 1‘'S AND REPEATED TWICE MORE ADDRESS IN THE DOWARD DIRECTION. 
sFINALLY EVERYTHING IS REPEATED FOR EACH BIT POSITION BEING THE LSB. TO SAVE 
3 TIME AND KNOWING THE LAYOUT OF THE RAM CHIPS INSTEAD OF DOING ONLY A SINGLE 
sBIT AT A TIME EVERY THIRD BIT WILL BE DONE CONCURRENTLY. ALSO NOTE THAT 
sSINCE THE TAG STORE CANNOT BE DIRECTLY ACCESSED THE ENTIRE PATTERN MUST BE 
sDONE BY DOING MEMORY CYCLES TO THE CORRECT BUS ADDRESSES. 10 DO THIS THE 
sTEST WILL BE DONE WITH THE DIAGNOSTIC BIT IN THE CCR (BIT 1) SET TO Al, 
sTHIS TEST RUNS IN STANDALONE MODE. 

3 


F 

sBGNTST 

sSETUP AND ENABLE MMU 

sSETUP CCR TO ABORT PARITY ERRORS 

3:00 IN STANDALONE MODE FOR EACH HALF SEPARATELY 

sLET FWOSEQ = @1 

sLET ADDLSB = 41 

3:00 UNTIL ADOLSB EQ 020000 

i. LET NEWDAT = 22200 

LET CURDAT = 0 

IF FWOSEQ = 01 THEN 

FSTADD EQUAL FIRST ADDRESS OF 4K BrTE BUFFER 
LASTAD EQUAL LAST ADDRESS OF 4K BYTE BUFFER 


FSTADD EQUAL LAST ADDRESS OF 4K BYTE BUFFER 
— LASTAD EQUAL FIRST ADDRESS OF 4k BYTE BUFFER 
& 


° LET DCOUNT = 00 
- UNTIL DCOUNT EQ 010 

READ CURADD USING CURDAT AS PAR 
. If MISS THEN 
. ” ERROR 


CURADD USING NEWDAT AS PAR 


OS-APR-84 16:45 
TEST 


ELSE 


ENOIF 
WRITE 
ENDIF 
° IF HIT THEN 
. . . ERROR 

, ENOIF 
READ CURADD USING NEWDAT AS PAR 
IF MISS THEN 

ERROR 


ENOIF 
If CURADD EQ LASTAD THEN 
. LET CURDAT = NEWDAT 


IF DCOUNT < @1 THEN 
‘ LET NEWDAT = NEWDAT SETBr RITEDA ROTATED LEFF’ 
ENDIF 
IF DCOUNT >» 01 THEN 
nie LET NEWDAT « NEWDAT CLR By RITEDA ROTATED - €& 
LS 

LET NEWDAT «© @155400 (NO ALL | 5) 


SEQ 0538 


COKRDABO KOILT 8 CLUSTER MACY11 30(1046) 
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COKDAB P11 


1ai-? 
18178 
181°9 
18180 
18181 
18182 
181853 
18184 
18185 


110526 
110530 
110536 
110540 
110544 
110552 
110556 
110562 
110570 
110576 


000004 
032777 
001002 
000137 
042737 
004737 
005237 
012737 
052737 
013737 


012703 
012704 
012705 
0004 


06 
012703 
012704 
012705 
012737 
012702 
010300 
012220 
022702 
001374 
012700 
162700 


110764 
110470 


070402 


177520 


172516 
177746 
001160 


172354 


Cll 
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ENDIF 


“ee eee #8 © © © © © © @ © 
“ere ee 


ENOIF 
NOOO 
IF FWOSEQ EQ #1 THEN 
° LET FWOSEQ = oC 
ELSE 
° ROTATE ADODLSB 

: LET FWOSEQ = 1 
° ENOIF 


sENDDO 
sRESTORE PARITY ABORT VECTOR 
sENOTST 
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LET RITEDA = #22200 


ENDIF 
INCREMENT OCOUNT 
. IF FWOSEQ = #1 THEN 


LET CURADD +» CURADD + ADDLSB 
IF CURADD GE HIGH ADDRESS THEN 
bow LET CURADD = CURADD + #7776 


LET CURADD = CURADD - ADODLSB 
IF CURADD LE LOW ADDRESS THEN 


° LET CURADD + CURADD - 07776 
ENOIF 


BS SSSHASHASNSHASHHAHHASHESEEHEHESHEEESEHEEEHEEESESHEEEEASEEEEEEEEHEEEEE 


TST27: SCOPE 
BIT OBI TOG ,ASWR 
BNE 1008 
JMP ENDTAG 

100$: BIC #1000 ,8CSR 
JSR PC, INI TMM 
INC SRO 
MOV &BITO4 ,MMRS 
BIS ee, CCR 
MOV 904, $TMPO 

a 

sSTORE TEST IN THE FIRST 2k AND 

é 
MOV #140000 ,R3 
MOV #130000 ,R4 
MOV 0137776,R5 
BR $ 

18: MOV #150000 ,R3 
MOV #120000 ,R4 
MOV @127776,R5 

es: MOV 92000 ,K [IPAR6 
MOV OEXITST,R2 
MOV R3,RO 

3$: MOV CR2)+,CRO)> 
CMP MENDTAG ,R2 
BNE 3$ 
MOV @STMOVT ,RO 
SUB OEXITST,RO 


sRUN THIS TEST? 

sIF SET, GO OO IT 
sOTHERWISE, GO TO NEXT TEST 
sOISABLE HALT ON BREAK 
;SETUP MEMORY MANAGEMENT 

3 TURN ON MMU 

sENABLE 22-BIT MAPPING 

sSET OIAG. BIT 

sSTORE TIMEOUT VECTOR 


THEN IN THE SECOND 2k 


sSTART FOR THE TEST 
sLOWER BOUNDARY TEST AREA 
s4IGH BOUNDARY TEST AREA 


sSTART OF THE TEST 

;LOWER BOUNDARY TEST AREA 
s4IGR BOUNDARY 

sABOVE 32K 

sSTART WITH CURRENT 

sMOVE TO UPPER 4k 

sWORD BY WORD 

sALL DONE? 


: 
sADDRESS OF ROUTINE 
sPROPER OF SET 


SEQ 0339 


Dil 
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18283 110672 050003 BIS RO,RS a 

18234 110674 004715 JSR PC,CRS) sGO DO THE ROUTINE 

18235 110676 005700 TST RO sANY ERRORS? 

18236 110700 001407 BEQ ag s CONT INUE 

18237 110702 010037 001122 MOV RO, $BDADR sSTORE FAILED ADDRESS 

18238 110706 042737 160000 001122 BIC #160000, $BDADR sCLEAR PAR 

18239 110714 104050 ERROR *50 

18240 110716 000403 BR S$ sEXIT TEST 

18241 1107 022703 150000 43; CMP #150000 ,R35 sDONE FOR BOTH HALVES? 

18242 110724 103736 BLO i$ sIF NOT, DO AGAIN 

18243 110726 013737 001160 000004 5%: MOV STMPO, 904 sRESTORE TIMEOUT VECTOR 

18244 110734 012737 000400 177746 MOV 9400, CCR sINIT CCR FOR EXIT 

18245 110742 005037 177572 CLR SRO sTURN OFF MMU 

18246 110746 005037 172516 CLR MMR F 

18247 110752 052737 001000 177520 BIS #1000,8CSR sENABLE HALT ON BREAK 

tases 110760 000137 111630 JMP ENDTAG sEXIT TEST 

18249 

16250 .DOSABL AMA 

18251 110764 052737 000400 177520 STMOvT: BIS ©BI TOS ,@oBCSR sSTANDALONE MODE 

18252 110772 042737 100000 172312 BIC @BIT15, BeKIPORS sNO BYPASS 

16253 111000 042737 100000 172300 BIC #100000 , 8@K IPDRO sNO BYPASS 

18254 111006 012737 172360 000004 MOV @KDPARO , 804 i TIMEOUT VECTOR 

18255 111014 012737 000340 000006 MOV 0340, a6 

18256 111022 012737 000006 172360 MOV 6, QeKDPARO ‘PUT RETURN 

18257 111030 052737 100000 172300 BIS 100000, @oK IPDRO sBYPASS 

18258 111036 005037 172352 CLR BOK LPARS 5 

1€259 111042 010400 MOV R4,RO sCLEAR CACHE UNDER TEST 

18260 111044 012701 004000 MOV #4000, R1 ; 

18261 111050 005v20 43; CLR (RO)+ : 

18262 111052 077102 S08 Ri, 4% H 

16263 111054 005000 CLR RO sCLEAR ERROR FLAG 

18264 111056 012767 000061 177422 MOV ol, FWOSEQ sSET UPWARD ADDRESSING INDICATOR 
18265 111064 012767 000002 177416 MOV e2, ADDL SB s INITIALIZE LEAST SIGNIFIGANT BIT 
18266 111072 005067 177420 TSLOOP: CLR CURDAT :OLD DATA 

18267 111076 012767 022200 177410 MOV 022200 ,NEWDAT 3SET ADDRESS BITS 

16268 111104 012767 022200 177400 MOV 922200,RITEDA sSET ADDRESS BITS 

18269 111112 005767 177370 TST FWOSEQ sIF ADDRESSING UPWARD 

18270 111116 001405 BEQ 1$ 3 THEN 

18271 111120 010467 177374 MOV R4, FSTADD sFIRST ADOKESS WILL BE LOWEST ADDRESS 
18272 111124 010567 177372 MOV RS, LSTADD sAND LAST ADORESS WILL BE HIGHEST 
18273 111130 000404 BR es sELSE 

16274 111132 010567 177362 1$; MOV RS, FSTAOD sFIRST ADDRESS WILL BE HIGHEST ADDRESS 
18275 111136 010467 177360 MOV R4, LSTADD sAND LAST ADORESS WILL BE LOWEST 
18276 111142 005067 177332 2s: CLR OCOUNT s INITIALIZE LOOP COUNTER 

en A 111146 016767 177346 177350 MOV FSTADD, CURADD 

é 
oo ; DON'T REWRITE TIMEOUT VECTOR 
3 

162861 111154 016700 177344 3$; MOV CURADD, RO sSTORE CURRENT ADDRESS 

16262 111160 042700 170000 BIC #170000 ,RO sLEAVE ONLY LOW 4k BITS 

182863 111164 022700 000004 CMP 04, RO sTIMOUT VECTOR? 

18264 111170 001526 BEQ 16$ sIF SO, DON'T REWRITE IT 

18285 111172 022700 000006 CMP 06, RO sOR PRIORITY 

18286 111176 001523 6EQ 16% j 

18287 tte 016737 177312 172352 MOV CURDAT, @@K IPARS sGET OLD PATTERN 

11 


206 O0£777 177312 1ST @CURADD sO0LD DATA OK? 


Ell 
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18289 111212 013767 177752 177264 MOV QOHITMIS ,RECDAT 

18290 111220 032767 000004 177256 5%: BIT #BITO2, RECDAT +4 ACCESS WAS A MISS 

18291 111226 001002 BNE 6$ THEN 

18292 111230 000167 000346 JMP EXBAD2 FERROR, EXIT 

18293 111234 016737 177254 172352 6%: MOV NEWDAT, @KIPARS sGET NEW PATTERN 

18294 111242 005077 177256 CLR @CURADD sREGISTER AND WRITE LOCATION 

16295 111246 013767 177752 177230 MOV BOHITMIS ,RECDAT 

18296 111254 032767 000004 177222 8%: BIT @BITO02, RECDAT ;IF ACCESS WAS A HIT 

18297 111262 001406 BEQ 9$ 3 THEN 

16298 111264 032767 000010 177212 108: BIT @BITO3, RECDAT sMISS? 

18299 111272 001402 BEQ 9$ sIF SO, CONTINUE 

18300 111274 000167 000302 JMP EXBAD2 s;ERROR 

18301 111300 005777 177220 9$: TST @CURADD ;REGISTER AND READ LOCATION 

18302 111304 013767 177752 177172 MOV QeHITMIS ,RECDAT 

18303 111312 032767 000004 177164 11%: BIT @BITO2, RECDAT 44 ACCESS WAS A MISS 

18304 111320 001002 BNE 12$ THEN 

18305 111322 000167 000254 JMP EXBAD2 FERROR, EXIT 

18306 111326 026767 177170 177170 12%: CMP LSTADD, CURADD sIF CURRENT ADDRESS IS LAST ADDRESS 
18307 111334 001044 BNE 16$ 3 THEN 

18308 111336 016767 177152 177152 MOV NEWDAT , CURDAT sNEW KIPARS 

18309 111344 022767 000001 177126 CMP “1, DCOUNT ;IF LOOP COUNTER LESS THAN 1 

18310 111352 003406 BLE 13$ 3 THEN 

18311 111354 006367 177132 ASL RITEDA sUPDATE OF NEW DATA.... 

18312 111360 056767 177126 177126 BIS RITEDA, NEWDAT 3BY SETTING BITS 

18313 111366 000421 BR iS$s sENDIF 

18314 111370 022767 000001 177102 13%: CMP #1, OCOUNT sCHANGE PATTERN? 

18315 111376 001007 BNE 14$ sIF SO, BRANCH 

18316 111400 012767 022200 177104 MOV #22200, RITEDA sSTART WITH THE SAME 

18317 111406 012767 155400 177100 MOV #155400, NEWDAT ;00N'T OO ALL 1'S 

16318 111414 000406 BR 15$ 3 

18319 111416 006367 177070 148: ASL RITEDA sUPDATE OF NEW DATA.... 

18320 111422 046767 177064 177064 BIC RITEDA, NEWDAT 3BY CLEARING BITS 

18321 111430 000400 BR 15$ sELSE 

18322 111432 005267 177042 158: INC OCOUNT ; INCREMENT THE LOOP COUNTER 

18323 111436 016767 177056 177060 MOV FSTADD, CURADD sF INISH FIRST CURRENT ADDRESS 

18324 111444 000426 BR 18$ sELSE 

18325 111446 005767 177034 168: TST FWOSEQ 3IF ADDRESSING UPWARD 

18326 111452 001412 BEQ 17% 3 THEN 

18327 111454 066767 177030 177042 ADD ADOLSB, CURADD sADD THE VALUE OF THE CURRENT LSB 
18328 111462 020567 177036 CMP RS, CURACD s:IF CURRENT ADORESS GREATER THAN HIGHEST 
18329 111466 002015 BGE 18% sVIRTUAL ADDRESS THEN 

18330 111470 162767 007776 177026 SUB 07776, CURADD sROLL IT BACK 

18331 111476 000411 BR 18$ sELSE 

18332 111500 166767 177004 177016 i7%: SUB ADDLSB, CURADD 3;IF ADDRESSING DOWNWARD THEN SUBTRACT LSB 
18333 111506 020467 177012 CMP R4, CURADD 3;IF CURRENT ADDRESS LESS THEN LOWEST 
18334 111512 003403 BLE 18$ sVIRTUAL ADDRESS THEN 

18335 111514 062767 007776 177002 ADD #7776, CURADD sROLL IT BACK 

18336 111522 022767 000005 176750 18%: CMP oS, DCOUNT :IF LOOP COUNTER LESS THAN 7 

18337 111530 003402 BLE 181$ ; THEN LOOP BACK FOR NEXT BIT POSITION 
18338 111532 000167 177416 JMP 3$ 

18339 111536 005767 176744 1818; TST FWOSEQ 4 4 ADDRESSING UFWARD 

18340 111542 001404 BEQ 193 THEN 

18341 111544 005067 176736 CLR FWOSEQ iSTART ADDRESSING DOWNWARD 

18342 111550 000167 177316 JMP TSLOOP sELSE 

18343 111554 012767 000001 176724 19%: MOV #1 FWDSEQ sSTART ADDRESSING UPWARD 


18344 111562 006167 176722 ROL ADDL. SB sROTATE LSB TO NEXT POSITION 


Fil 
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COKDAB.P11 05 -APR-84 16:45 TEST - MOVING INVERSIONS TEST FOR TAG STORE SEQ 0342 
18345 111566 022767 020000 176714 CMP #20000, ADDLSB sALL DONE? 

18346 111574 001406 BEQ TSEND sEXIT 

18347 111576 000167 177270 JMP TSLOOP sENDDO 

18348 111602 013701 172352 EXBAD2: MOV BOK IPARS ,R1 sSTORE PAR 

18349 111606 016700 176712 MOV CURADD, RO sAND ADDRESS 

18350 111612 012737 001200 172352 TSEND: MOV #1200, @oKIPARS sRESTORE PAR 

1835i 111620 042737 000400 177520 BIC oBITO8, @eBCSR sOUT OF STANDALONE MODE 
18352 111626 000207 RTS PC ;RE TURN 

18353 111630 ENOTAG: 

18354 -ENABL AMA 


Gil 
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COKDAB.P11 05 -APR-84 16:45 TEST - PCR READ/WRITE BITS SEQ 0343 
18356 -SBTTL TEST - PCR READ/WRITE BITS 
18357 sPCR AND BCSR READ/WRITE BITS 
18358 ;THE FIRST TEST WILL CHECK THAT PCR REGISTER IS BOTH WORD AND 
18359 sBYTE ADDRESSABLE. BITS 14-09 AND 06-01 WILL BE WRITTEN AND READ 
18360 3AS ZEROES AND ONES. THE REST OF THE BITS HAVE TO BE ALL O'S. 
18361 sROUTINE TEST 
18362 Tr SAVE PCR 
18363 T LET PCR=0 
18364 3. DO FOR PATTERN=001111,110011,101010,010101 
18365 3. ; WRITE PCR<14-09>=PATTERN 
$. ‘ WRITE PCR<06-01>-PATTERN 
18367 3. IF PCR<14-09> NE PATTERN OR PCR<06-01> NE PREVIOUS 
18368 3. ; PATTERN 
18369 oe ; ; THEN FRROR 
1837 Bs . ENDIF 
18371 3. ; WRITE PCR<06-01>=PATTERN 
18372 3. , IF PCR<14-09> NE PATTERN OR PCR<06-01> NE PATTERN 
18373 oe ‘ ‘ THEN ERROR 
16374 3. ‘ ENDIF 
18375 3. ENODO 
18376 o. WRITE PCR=0101010101010101 
18377 3. IF PCR NE 0101010001010100 THEN 
18378 3. ERROR 
18379 3. ENDIF 
18380 3 ENDROUT INE 
18381 
18382 FF SSSHSSHSHSAHSEEHESASHSHESHSHHEEESESESHHEEHESESHEEEHEESEHEAESEEHEEEEEESE 
18383 111630 000004 TST3O: SCOPE 
18384 111632 005037 177522 cLR PCR INITIALIZE PCR TO O 
1838S 111636 012702 111775 MOV @SIXBIT+1,R2 3R2->TABLE OF PATTEI.NS FOR 6 R/w BITS IN 
18386 111642 012704 111774 MOV @SIXBIT,R4 3R3 POINTER TO PREVIOUS PATTERN 
yte44 111646 012703 000004 MOV 04,R3 3:00 4 TIMES 
3 
ya 3; WRITE TO HIGH BYTE FIRST 
18391 111652 111237 177523 1$: MOvB (R2),PCRe1 sWRITE TO HIGH BYTE 
18392 111656 121237 177523 CMPB (R2),PCR+1 sBYTE WRITTEN OK? 
18393 111662 001003 BNE 23 ;IF NOT, BRANCH 
18394 111664 121437 177522 CMPB (R4),PCR LOW BYTE CHANGED? 
18395 111670 001405 BEG 38 3IF NOT, BRANCH 
18396 111672 111237 001125 28: MOVB (R2), $GDOAT +1 ;EXPECTED PATTERN HIGH BYTE 
18397 111676 111437 001124 MOVB (R4), $GDDAT sLOW BYTE 
18398 111702 104051 ERROR +51 sERROR PCR READ/WRITE BITS 
pote 111704 105724 3%: TSTB (R4)- ; INCREMENT POINTER FOR OLD 
3 
18401 ; WRITE TO LOW BrTe 
18402 : 
18403 111706 111237 177522 MOvVB (R2),PCR sWRITE TO LOW BYTE 
18404 111712 121237 177522 CMPB (R2),PCR sBYTE WRITTEN OK? 
18405 111716 001003 BNE 4s 3 IF NOT,BRANCH 
18406 111720 121237 177522 CMPB (R2),PCR sMIGH BYTE CHANGED? 
18407 111724 001405 BEQ 5$ 3IF NOT, BRANCH 
18408 111726 111237 001124 4s: MOVB (R2), $GDDAT sEXPECTED PATTERN HIGM BYTE 
16409 111732 111237 001124 MOVB (R2),$GDDAT ;LOW BYTE 
18410 111736 104051 ERROR +51 sERROR PCR READ/WRITE BITS 


18411 111740 105722 S$: TSTB (Re s INCREMENT POINTER FOR NEW PATTERN 
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18412 
3 


111742 


111744 
111752 
111760 
111762 
111770 
111772 
111772 


111774 
111777 


077335 


012737 
022737 
001404 
112737 
104051 


000403 


000 
124 


112002 
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052525 
052124 


052124 


036 
0Se 


177522 
177S22 


001124 


146 


HL | 
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TEST - PCR READ/WRITE BITS 


SOB R3,18 
3 
: NOW TRY WORD ADDRESSING 
3 
MOV 952525 ,PCR 
CMP #52124,PCR 
BEQ 6$ 
MOVB #52124, $GDDAT 
ERROR +51 
o$: 
BR TST31 


SIXBIT: .BYTE 0,36,146,124,52 


EVEN 


300 FOR ALL 4 PATTERNS 


sWRITE A PATERN 

7 ALL BuT BITS <8,7,0> OK? 
IF SO, BRANCH 

sEXPECTED PATTERN 

sERROR PCR READ/WRITE BITS 


33G0 TO NEXT TEST 
3001111,110011,101010,019101 
sBINARY DIVIDE FOR 6 BITS 


SEG 0344 
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18429 
18430 


112002 
112004 
112012 


112070 
112072 


112074 
112102 
112110 


000004 
013737 
005037 


012703 


077221 


012737 
032737 
001403 


177520 002710 


177520 


112252 


177520 
001124 
177520 


000010 
000010 


177520 
77520 
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TEST - BCSR READ/WRITE BITS 


-SBTTL TEST - BCSR READ/WRITE BITS 
;THE SECOND TEST WILL CHECK THAT BCSR<7-5;2-0> CAN BE WRITTEN AND 


sREAD AS ZEROES AND ONES. 8CSR<14,03> SHOULD BE 0'S. B8CSR<04> 

;SHOULD BE CLEARED BY RESET INSTRUCTION. 

sROUTINE TEST 

es FOR PATTERN=011,010,101 DO 

Be WRITE BCSR<7-5>=PATTERN 

8. ‘ IF BCSR<7-5> NE PATTERN THEN 

Se . P ERROR 

Ge . ENOIF 

Es . WRITE BCSR<2-0>=PATTERN 

$s IF BCSR<2-0> NE PATTERN THEN 

Ss ‘ " ERROR 

Se ‘ ENDIF 

Be ENDDO 

“a IF BCSR<14,03> NE <0,0> THEN 

bs . ERROR 

Se ENDIF 

Be LET BCSR<04>=1 

is IF BCSR<O04> NE #1 THEN 

Os ‘ ERROR 

is ENDIF 

Bs EXECUTE “RESET” 

bs IF BCSR<04> NE O THEN 

S- . ERROR 

Ss ENDIF 

Ss LET BCSR<04>=0 (THIS BIT IS WRITE ENABLE FOR EAROM) 

3s ENDROUT INE 

FF SSOSAAEAHAHAASSSASAHEAEESASASESESESEEHASSEHEEHEEEHEEEEHEESESEEAAEHESESEEE 

TST31: SCOPE 
MOV BCSR,SAVBR sSAVE BCSR 
CLR BCSR :;CLEAR BCSR 

3 

3; WRITE TO BITS <7-5> AND <2-0> 

3 
MOV @THRBIT,R3 sPOINTER FOR PATTERN TABLE 
CLR $GODAT ;CLEAR A LOCATION 
MOV #3,R2 300 FOR ALL PATTERNS 

1$: MOVB (R3),BCSR sWRITE TO BITS <7-5> 
MOVB (R3),$GDDAT sEXPECTED PATTERN 
CMPB (R3)+,BCSR sBITS WRITTEN OK? 
BEQ 2s sIF SO, BRANCH 
ERROR +52 ;ERROR IN BCSR READ/WRITE BITS 

2s: MOVB (R3),BCSR sWRITE TO BITS <2-O> 
MOvVB (R3),$GDDAT ;EXPECTED PATTERN FOR ERRORS 
CMPB (R3)+,BCSR sBITS WRITTEN OK? 
BEQ 3$ sIF SO, BRANCH 
ERROR +52 sERROR IN BCSR READ/WRITE SITS 

3$; SoB R2,1$ sCONTINVE TILL ALL PATTERNS DONE 

Fy 

3 CHECK UNUSED BITS <3> 
MOV #10,BCSR sWRITE TO BIT <3> 
BIT #BITO3,BCSR sALL ZEROES? 
BEQ 4$ ;IF YES, BRANCH 


SEQ 0345 


J11 
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COKDAB.P11 OS -APR-84 16:45 TEST - BCSR READ/WRITE BITS SEQ 0346 
18485 112112 005037 001124 CLR $GODAT sEXPECTED PATTERN 
Sees? 112116 104052 ERROR +S2 sERROR IN BCSR READ/WRITE BITS 
‘ ‘ 
pees 3; CHECK THAT BIT <4> CLEARS BY RESET 
6 
18490 112120 052737 000020 177520 4%: BIS #681104 ,BCSR sSET BIT 4 
18491 112126 032757 000020 177520 BIT #B1T04 ,BCSR sWRITTEN OK? 
18492 112134 001005 BNE S$ sIF SO BRANCH 
18493 112136 012737 000020 001124 MOV @BITO4, $GDDAT sEXPECTED PATTERN 
18494 112144 104052 ERROR +S2 sERROR IN BCSR READ/WRITE BITS 
18495 112146 000421 BR 7$ sEXIT TEST 
18496 112150 042737 000020 177520 5$: BIC #BIT04,BCSR sTRY TO CLEAR BIT 4 
18497 112156 032737 000020 177520 BIT #BITO4,BCSR sCLEARED OK? 
18498 112164 001403 BEQ 6$ ;IF SO BRANCH 
18499 112166 005037 001124 CLR $GDDAT sEXPECTED PATTERN 
18500 112172 104052 ERROR *S2 sERROR IN BCSR READ/WRITE BITS 
18501 112174 122737 000001 001220 6%: CMPB OAPTENV, SENV sRUNNING IN APT MODE? 
18502 112202 001003 BNE 7$ sNO, GO DO TEST 
18503 112204 005737 001206 TST $PASS iFIRST PASS? 
18504 112210 001014 BNE 8$ :IF APT AND NOT FIRST PASS,EXIT 
18505 112212 052737 000020 177520 7$: BIS #BITO4 ,BCSR sSET BIT 4 AGAIN 
18506 112220 000005 RESET sEXECUTE RESET 
18507 112222 032737 000020 177520 BIT #BIT04,BCSR sBIT 4 CLEARED? 
18508 112230 001404 BEQ 8$ :;IF YES, BRANCH 
18509 112232 104053 ERROR +53 sRESET DOESN'T CLEAR BCSR<4> 
18510 112234 042737 000020 177520 BIC #BIT04 ,BCSR sCLEAR BIT 4 
18511 112242 013737 002710 177520 8%: MOV SAVBR,BCSR sRESTORE BCSR 
ety 112250 000403 BR TST32 33GO TO NEXT TEST 
18514 112252 140 003 100 THRBIT: .BrTe 140,3,100,2,240,5 3011,010,101 FOR BITS <7-5,2-0> 
18515 112255 002 240 00s 


Kil 
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18517 
18518 
18519 
18520 
18521 
18522 
18523 
18524 
18525 
18526 
18527 


112260 
112262 
112270 


112276 
112300 
112304 
112310 
112314 
112316 
112322 
112326 
112332 
112336 
112340 
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005722 
022702 


16:4 


177520 002710 
000340 177520 


177522 
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- 16 BIT ROM CHECKSUM TEST 


-SBTTL TEST - 16 BIT ROM CHECKSUM TEST 
sROM’S CHECKSUMS 


3 

316 BIT ROM TEST 

;THE FIRST TEST WILL CLEAR BCSR<07>, LOAD PCR<14-09> WITH 

;ROM ADDRESS BITS <14-09>, AND CHECK CHECKSUMS OF 16-BIT ROM 

sBY ACCESSING IT THRU BUS ADDRESSES 173000-173776. THEN WITH 
3BCSR<06;05> BOTH CLEAR, PCR<06-01> USED AS ADDRESS BITS 14-09, 

;THE SAME THING WILL BE DONE BY ADDRESSING 16-BIT ROM THRU BUS ee 
3165000-165776. THE RESULTS SHOULD BE THE SAME AND SHOULD COMPAR 

;WITH THAT STORED IN THE BOOT AND DIAGNOSTIC ROM. 


a 
;BCSR = <O7> DISABLE 17773000 
; <06> DISABLE 17765000 


3 <05> ROM SOCKET 3 AT 17765000 

3 

sROUTINE TEST 

Re LET BCSR<7,6,5>20,0,0 

Bs DO FOR R1 FROM #0 TO #31. BY #1 DO 

is ‘ LET PCR<14-09>=R1 

Be . DO FOR R2 FROM #0 TO #776 Br 2 
t. » + CALCULATE CHECKSUM THRU 173000 
ha r ENDDO 

Ox ENDDO 

e IF CHECKSUM NE #0 THEN 

Bis . ERROR 

ba ENDIF 

Se DO FOR R1 FROM #0 TO #31. BY #1 

3. . LET PCR<06-01>=R1 

Re . DO FOR R2 FROM #0 TO #776 BY 2 
He ; ‘ CALCULATE CHECKSUM THRU 165000 
be . ENDDO 

fis ENDDO 

is IF CHECKSUM NE #0 THEN 

Ss ¥ ERROR 

ts ENDIF 

3; ENDROUT INE 


FF FHSSHAAAAESAHEAESEEEHAHREEEEHREEEEEHASEELEAEEESEESEEEEHESESESEEESEESEEESE 


TST32: SCOPE 


MOV BCSR, SAVBR sSAVE BCSR 
BIC #BITO7!BITO6!BITOS,BCSR sREAD 16 BIT ROM 
3 
3; CALCULATE LOW BYTE CHECKSUM’S THRU 173000 AND 165000 
3 
CLR R1 sPAGE COUNT FOR ALL 8K 
CLR PCR ;CLEAR PAGE CONTROL REGISTER 
1$; CLR ACTCHS sCLEAR CHECKSUM AT 173000 
CLR $TMPO sAT 165000 
CLR R2 ;CLEAR COUNTER THRU A PAGE 
2s: MOV 173000(R2),R3 ;GET LOW BYTE THRU 173000 
MOV 165000(R2),R4 ;THRU 165000 
ADD R3,ACTCHS sCALCULATE CHECKSUM THRU 173000 
ADD R4,$TMPO sCALCULATE CHEKCSUM THRU 165000 
TST (R2)+ ;GET NEXT WORD 


CMP #776,R2 sWORD BEFORE LAST? 


SEQ 0347 
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18573 
18574 
18575 
18576 


112424 


112426 
112432 
112436 
112440 
112444 
112450 
112454 


013737 
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177522 


000176 
173774 177522 


000002 
177522 
177523 
000200 


002704 
001160 


177522 
177520 002710 


3$: 


4$; 


5$: 


3 
; CHECK 
A 

LASTCH: 


1$: 
2s: 


3$; 


4$: 


S$: 


6$: 


Lil 
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16 BIT ROM CMe EKSUn TEST 
BNE 3$ 
CMP R3,PCR 
BEG $ 
ERROR +54 
CMP #1000 ,R2 
BGT $ 
TST ACTCHS 
BEQ 4$ 
ERROR +54 
TST $TMPO 
BEQ 5$ 
ERROR +54 

#2,R1 


CMP #160,Ri 

BGT 1$ 

THE LAST 2K OF ASCII TEXT 
CLR ACTCHS 

CLR $TMPO 

CLR R2 

MOV 173000(R2),R3 
MOV 165000(R2),R4 
ADD R3,ACTCHS 
ADD R4,$TMPO 

TST (R2)+ 

CMP #1000 ,R2 

BGT es 

CMP #176,R1 

BNE 4s 

CMP 173774,PCR 
BEQ 4$ 

ERROR +54 

ADD #2,R1 


CMP #200,R1 
BGT 1$ 

TST ACTCHS 

BEQ $ 

ERROR +54 

TST $TMPO 

BEQ 6$ 

ERROR +54 

CLR PCR 

MOV BCSR, SAVBR 


sIF NOT, BRANCH 

sPAGE NUMBER STORED OK? 
sIF YES, BRANCH 

sPAGE NUMBER STORED WRONG 
sLAST WORD IN A PAGE? 


sIF YES, BRANCH 

:IN CHECKSUM AT 173000 
sCHECKSUM O AT 165000? 

sIF YES, BRANCH 

3 IN CHECKSUM AT 165000 

;GET NEW PAGE 

sSTORE IN PCR<6-1> 

sSTORE IN PCR<14-9> 

;ALL PAGES IN Re FROM BIT1? 
;IF NOT BRANCH 


sCLEAR CHECKSUM AT 173000 
sAT 165000 

;CLEAR CIUNTER THRU A PAGE 
;GET LOW BYTE THRU 173000 
:THRU 165000 

;CALCULATE CHECKSUM THRU 173000 
sCALCULATE CHEKCSUM THRU 165000 
;GET NEXT WORD 

3LAST WORD IN A PAGE? 

3IF NOT, BRANCH 

;LAST PAGE? 

3;IF NOT, BRANCH 

sPROPER PAGE NUMBER? 

sIF YES, BRANCH 

;ERROR IN ROM 

;GET NEW PAGE 

;STORE IN PCR<6-1> 

;STORE IN PCR<14-9> 

sALL PAGES IN R2 FROM BIT1? 
;IF NOT BRANCH 

3CHECKSUM 0? 

3IF YES, BRANCH 

3IN CHECKSUM AT 173000 
;CHECKSUM O AT 165000? 

;IF YES, BRANCH 

:IN CHECKSUM AT 165000 
;CLEAR PCR 

sRESTORE BCSR 


SEQ 0348 
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18624 .SBTTL TEST - 8 BIT ROM CRC TEST 
1 ;THIS TEST WILL CLEAR BCSR<6>, 
18626 

18627 

18628 s;RESPONSE ONLY OF THE BASE AREA, 
18629 ;ROUTINE TEST 

18630 -" LET BCSR<S>*1 

18631 be LET OLDCRC=00 

18632 ; LET PCR<05-01>=00 
18633 Be 

18634 3. IF RESULTING CHECKSUM NOT ZERO THEN 
18035 3. , ERROR 

18636 3. ENDIF 

18637 3 ENDROUI TNE 

18638 

18639 

18640 112564 TST33: SCOPE 

18641 112566 013737 177520 002710 MOV BCSR,SAVBR 
18642 112574 042737 000100 177520 BIC #BITO6,BCSR 
18643 112602 052737 000040 177520 BIS #BITOS,BCSR 
18644 112610 005037 001160 CLR $TMPO 

18645 3 

18646 ; CALCULATE LOw 

18647 Fy 

18648 112614 005001 1$: CLR R1 

18649 112616 005037 177522 CLR PCR 

18650 112622 005037 002704 2s: CLR ACTCHS 

18651 112626 005002 CLR 

18652 112630 116204 165000 3$: MOVB 165000cR2), R4 
18653 112634 37 001160 ADD R4, 

18654 112640 005722 TST Rade 

18655 112642 022702 000316 CMP 316,R2 
18656 112646 001004 BNE 

18657 112650 122704 000252 CMPB #252 ,R4 
18658 112654 001765 BEQ 3$ 

18659 112656 104055 ERROR +55 

18660 112660 022702 000322 4$: CMP #322,R2 
18661 112664 003361 BGT 

18662 112666 113737 165010 001162 MOVB 165010, $TMP1 
18663 112674 105737 001160 TSTB $TMPO 

18664 112700 001401 BEQ S$ 

18665 112702 104055 ERROR +55 

18666 112704 005037 177522 CLR PCR 

18667 112710 013737 002710 177520 MOV SAVBR,BCSR 


Mil 


SET BCSR<5S>, 


LOAD PCR<S-1> 


sWITH ADDRESS BITS 13-09, AND CHECK CRC PATTERNS OF 8-BIT ROM Br 
sACCESSING IT THRU ADDRESSES 165000-165776. THIS TEST VERIFIES THE 


CALCULATE CHECKSUM FOR THE FIRST 320 LOCATIONS 


3 FE PPSAARARAAASAEAAAERAAASARSHEALASESALAREAEAEAEEESEAEEARSEREREAEEESA 


BYTE CHECKSUM’'S THRU 165000 


sSAVE BCSR 

sENABLE INTERNAL RESPONSE 
;SELECT 8-BIT ROM 

;CLEAR SUM 


sPAGE COUNT FOR ALL 8K 
;CLEAR PAGE CONTROL REGISTER 
;CLEAR CHECKSUM AT 165000 
;CLEAR COUNTER THRU A PAGE 
;GET A BYTE THRU 165000 
sCALCULATE CHEKCSUM THRU 165000 
sGET NEXT WORD 

sWORD BEFORE LAST? 

3IF NOT, BRANCH 

3314 SHOULD HAVE 252 

sIF YES, BRANCH 

3;PAGE NUMBER STORED WRONG 
sLAST WORD IN A PAGE? 

;IF NOT, BRANCH 

sSTORE SIZE,<3>=1 2k 
sCHECKSUM O AT 165000? 

:IF YES, BRANCH 

sIN CHECKSUM AT 165000 


sRESTORE BCSR 


SEQ 0349 


Nil 
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18670 .SBTTL TEST - LKS BIT 
ptt 1 THESE TESTS WILL CHECK FUNCTIONALITY OF LKS<7-6> 
oh ;ACCESS LKS, CHECK THAT READY LKS<07> CAN BE O AND 1. 
+ 
18675 ame <07> LINE CLOCK MONITOR 
18676 <06> LINE CLOCK INTERRUPT ENABLE 
1867 } ROUTINE TEST 
18678 ;IF UFO AND LKS IS DISABLED THEN 
18679 3. EXIT TEST 
18680 viel 
18081 READ LKS TO SEE IF IT TIMEOUTS 
18682 e ‘(CHECK LKS<07>) 
18683 i. LET R1=#77777(WORST CASE COUNTER FOR SLOW CLOCK) 
18684 * LET 100=@ADDRESS OF LINE_CLOCK_INTERRUPT 
18685 be CLEAR INTERRUPT _FLAG 
18686 3. DO 3 TIMES 
18687 :. ‘ REPEAT 
18688 _ i . DECREMENT R1 
18689 he ‘ UNTIL R1 NE #0 OR LOW BYTE OF LKS LT #0 
18690 - IF LOW BYTE OF LKS GE #0 THEN (READY DIDN'T COME UP) 
18691 i. ‘ A ERROR 
18692 ne ‘ ENDIF 
18693 “- ENDDO 
18694 ;. IF INTERRUPT_FLAG NE #0 THEN CINTERUPT W/O LKS<6>-1) 
18695 + : ERROR 
18696 ENDIF 
18697 }ENDROUT INE 
18698 
18699 FF SSSHHAHSSHESSSESSESSASSASESEHESESSESESESSHEESESSESEHEEEEHEEESEESESESSEESESESD 
18700 112716 000004 TST34: SCOPE 
18701 112720 032737 000100 000052 BIT OBI TO6 8052 :;UFD MODE? 
18702 112726 001404 BEQ 1s :;IF NOT, GO DO TEST 
18703 112730 032737 010000 177520 BIT @BIT12,8CSR ;LKS DISABLED? 
phe 112736 001053 BNE TST35 :3:IF DLSABLED, EXIT TEST 
; 
18706 ; TRY TO ACCESS LKS WITHOUT TIMEOUT 
: 
18708 112740 013737 000004 001160 i$: MOV ERRVEC, $TMPO ;SAVE TIMEOUT VECTOR 
18709 112746 012737 112770 000004 MOV 02% ,ERRVEC s;POINT NEW VECTOR TO PROGRAM 
18710 112754 012737 000340 000006 MOV 0340 ,ERRVEC+2 ;AT PRIORITY 7 
18711 112762 005737 177546 TST LKS sACCESS LKS 
18712 112766 000403 BR 3$ ;IF NO TIMEOUT, CONTINUE 
18713 112770 104056 2%: ERROR +56 ; TIMEOUT READING LKS 
18714 112772 005726 TST (SP )+ ;ADJUST STACK POINTER 
18715 112774 005726 TST (SP )- 
aT 112776 013737 001160 000004 3:3: MOV $ TMPO,ERRVEC ;RESTORE TIMEOUT VECTOR 
; 
tte ; CHECK THAT READY BIT LKS<?> CAN BE 1 
a 
18720 113004 005037 002702 CLR LKSFL ;CLEAR INTERRUPT FLAG 
18721 113010 012737 132444 000100 MOV @LKSINT, 100 POINT VECTOR TO INERRUPT ROUTINE 
18722 113016 012737 000340 000102 MOV ©340,102 3AT PRIORITY 7 
18723 113024 012702 000003 MOV o3,R2 300 3 TIMES TO SYNCHRONISE 
18724 113030 012701 077777 4s: MOV 077777,R1 ;COUNTER FOR SLOW CLOCKS 
18725 113034 105737 177546 S$: TSTB LKS s;READY LKS<« ?>=1? 
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16:45 


O05 - APR - 
TEST 


84 16:45 PAGE 
LKS BIT 7 

BMI 6$ 
SOB Ri,5$ 
TSTB LKS 
BMI 7$ 
ERROR 57 
S08 Re, 4$ 
TsT LKSFL 
BEQ TST35 
ERROR +61 


Ble 


552 


ssIF NONE, EXIT 


sIF SO, DO NEXT LOOP 
sOTHERWISE, GO THRU COUNT 
sWAS READY 1? 

sIF YES, BRANCH 

3LKS<07> DOES NOT BECOME 1 
300 ALL 3 TIMES 

See INTERRUPTS W/O L5«6>=1? 


S 
sILLEGAL CLOCK INTERRUPTS 


_" 
m 


SEQ 0351 
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Pil 0 


113110 


ey yt 
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000004 
032737 
001404 
032737 
001121 


005057 


th poe?! 
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1 80( 1046) 


000100 000052 


010000 


002 702 


177520 


C | ce 
eer Pr Pts HtReuPT PREOR ITY 


-SBTTL TEST - LKS INTERRUPT PRIORITY 
iCHECK THAT LKS INTERRUPTS HAPPEN AT PRIORIT: 5S CLEARING LK5<07> 
sAND DON'T HAPPEN AT PRIORITY 6. 
sROUTINE TEST 
sIF UFD AND LKS IS DISABLED THEN 
EXIT TEST 


sENDIF 
A» SET PRIORITY TO 5 
be CLEAR INTERRUPT FLAG 
3. LET LKS<06>*@1 CENABLE INTERRUPTS) 
as SET COUNTER TO WAIT FOR 3% INTERRUPTS 
ts REPEAT 
i DECREMENT COUNTER 
e UNTIL INTERRUPT FLAG EQ #3 OR COUNTER EQ 00 
Se CLEAR LKS<06> 
re IF LKS<O7> EQ @1 THEN 
x bow ERROR (WAS NOT CLEARED ON INTERRUPT ) 
be 
Bs IF COUNTER LT TIME REQUIRED FOR _3_INTERRUPTS FOR 800HZ 
i. “ ERROR CINTERRUPTS NEVER GO LOW) 
Ss ENOIF 
Se IF INTERRUPT _FLAG LT 03 THEN 
$s ERROR (INTERRUPTS DON'T HAPPEN) 
as ENDIF 
« CLEAR INTERUPT FLAG 
3. WAIT FOR LKS<7>=#1 
“ LET LKS<7>20 
Be IF LKS<7> NE @0 THEN 
“es , ERROR (LKS<7> NOT CLEARED 
Bs ENDIF 
Ra SET PRIORITY TO 6 
Se SET COUNTER TO 1 SLOW CLOCK INTERRUPT 
. SET LKS<06> 
bs REPEAT 
is DECREMENT COUNTER 
Be UNTIL COUNTER EQ 00 OR INTERRUPT FLAG NE 90 
as IF INTERRUPT FLAG NE 00 THEN 
3. énoir ERROR (INTERRUPT WAS AT WRONG PRIORIT?) 
- 
RESTORE ORIGINAL PRIORITY 
rENOROUT INE 


rROUT INE LINE CLOCK _INTERUPT 
INCREMENT INTERRUPT FLAG 
JENDROUTINE 


SESSSHSSSHSSSSHSHSSHHESESHSHHSSHSSHESHHHEHHSHEHHSEHESEHHEHEHHHESHEEHESHSEHOEOE 


TST35: SCOPE 


BIT OB1T06 , 8052 sUFD MODE ? 
BEQ 1$ 3T® NOT, GO DO TES! 
BIT #6811 12,BCSR sL&S DISABLED? 


BNE 15136 ssTF OLSABLED, EXIT TEST 


i 

3 WAIT FOR 3 INTERRUPTS AND CHECK Lks« 7+ TO BE O AFTER INTERRUPT 
* 

1$; CLR LKSFL 


sCLEAR INTERRUPT FLAG 


SEG O 


SJ 
ur 
\ 
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COKDAB 


ABP 11 


113266 
113274 


113276 
113302 
113506 
113312 
113320 
113324 
113326 
113330 
113334 
113336 
113344 
113346 


012737 
012701 
052737 


132444 
077777 
000100 
000100 


000240 
000003 


000100 


077737 


000003 
000003 


$0( 1046 ) 


000100 


177546 
177546 


002702 


177546 
177546 


177546 


177546 


002702 
001124 


177546 


001124 


Dle 


05: APR-84 16:45 P 3 
TES Pes PtteruPT Brio rr 
MOV OLKSINT,100 sPOINT VECTOR TD ROUTINE 
MOV 077777,R1 sCOUNTER FOR SLOW CLOCK 
BIS OBITO6,LKS 3SET INTERRUPT ENABLE BIT 
BIT #BITO6,LKS sBIT SET OK? 
BNE 2s sIF YES, BRANCH 
ERROR #131 sERROR WRITING 1 TO L¥S-6> 
2s: MTPS 9240 sSET PRIORITY 10 5S 
3$; CMP 03, LKSFL 33 INTERRUPTS HAPPENED? 
BEQ 4$ sIF YES, BRANCH 
S08 R1,38 sSTAY IN A LOOP 
3 
; DISABLE INTERRUPTS AND CHECK THAT PROPER CONDITIONS ARE MET 
3 
4$: MTPS #340 sRAISE PRIORITY 
BIC @BITO6,LKS sOISABLE INTERRUPTS 
BIT OBITO7,LKS 3LKS<7> CLEARED AFTER IN’ERRUO TS? 
BEQ 5$ sIF O, BRANCH 
ERROR +62 s INTERRUPTS DON'T CLEAR iK5<*> 
S$; TSsT8 LKS 3LKS<7>21? 
BPL 5$ 3IF NOT, WAIT 
CLR LKS sCLEAR LKS<7> 
BIT @BITO7,LKS 3LKS<7> CLEARED? 
BEQ 6$ 3sIF YES, BRANCH 
ERROR +60 3LKS<7> NOT CLEARED ON WRITE 
63: BIT #BITO6,LKS 3LKS<6>=0? 
BEQ 7$ sIF YES, BRANCH 
ERROR +131 sERROR WRITING O TO LKS<6> 
7$: CMP @77737,R1 sCOUNTER AT LESS THAN 800HZ? 
BGE 8$ ;IF NOT, BRANCH 
ERROR +63 sREADY LINE DOES NOT GO LOW 
8$: CMP @3,LKSFL s0ID $4 INTERRUPTS HAPPEN? 
BEQ 9$ sIF YES, BRANCH 
MOV #3, $GDDAT 33 INTERRUPTS EXPECTED 
ERROR +64 s; INTERRUPTS DON’T HAPPEN 
3 
: CHECK WHETHER INTERRUPTS HAPPEN AT PRIORITY 6 
3 
93: CLR LKSFL ;CLEAR INTERRUPT FLAG 
MTPS 300 sRAISE PRIORITY TO 6 
MOV @77777,R1 ;COUNTER FOR SLOW CLOCK 
BIS oBITO6,LKS 3;SET INTERRUPT ENABLE BIT 
10$: TST LKSFL. 3ANY INTERRUPTS? 
BNE 11$ 3IF vES, EXIT LOOP 
$08 R1,10$ sCONTINVE WITH COUNT 
11$: TST LKSFL ;ANY INTERRUPTS? 
BEQ 1c$ sIF NO, BRANCH 
MOV $GDDAT sSTORE PRIORITY FOR TYPE OU’ 


ERROR °65 sINTERUPTS HAPPEN AT WRONG PRIORITY 
128; MTPS 2340 sRESTORE PRIORITY 


SEQ O 


e 
565 
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113352 000004 
113354 032737 
113362 001404 
113364 032737 
113372 001052 


000100 
010000 


000052 
177520 


113374 
113402 
113410 
113416 
113420 
113424 
113426 
113434 
113442 
113444 
113452 


013737 177520 002710 
177520 


177520 


177520 
177520 


001124 


113454 
113460 
113466 
113474 
113500 


013701 
012737 
012737 
005737 
104066 


000004 
000006 


E12 
- © 
OS-APR-84 16:45 PAGE 355 

TEST - LINE CLOCK DISABLE 


-SBTTL TEST - t INE CLOCK DISABLE 

sLINE CLOCK DISABLE(«) 

sTHIS TEST WILL CHECK THAT BCSR<12> DISABLES RESPONSE 
;OF LKS REGISTER. 


; 

sBCSR_ = <12> LINE CLOCK STATUS REGISTER DISABLE 
sROUTINE TEST 

3IF UFD AND LKS IS NOT DISABLED THEN 


8. EXIT TEST 
;ENDIF 
3. WRITE BCSR<12>=1 
es LET 4=ADDRESS OF LKS_TRAP 
bs LET TRAP_LKS:0 
3. READ LKS 
bs IF TRAP_LKS NE 1 THEN 
t. . “ERROR 
ts ENDIF 
3s ENDROUT INE 
3 
sROUTINE LKS_ TRAP 
Be LET TRAP_LKS=1 
ts LET BCSR<12>20 
3sRTI 
FFPOSHAHAESSHASSHSESEESHEEEEEESEEEEHEHEEESEEEEEEEHEEEEEREREAEEESEEERE 
TST36: SCOPE 
BIT OBI T06 ,ae52 sUFD MODE? 
BEQ 18 ;IF NOT, BRANCH 
BIT #BIT12,BCSR 3LKS DISABLED? 
BNE TST37 s3IF DISABLED, EXIT TEST 
: 
; CHECK BCSR<12> TO BE O AND 1 
‘ ‘ 
1$: MOV BCSR,SAVBR sSAVE BCSR REGISTER 
BIC $BIT12,BCSR ;CLEAR BCSR 
BIT $BIT12,B8CSR 3<12>20? 
BEQ 2s sIF OK, BRANCH 
CLR $GODAT sCLEAR EXPECTED PATTERN 
ERROR *S2 sERROR BCSR READ/WRITE BITS 
2s: BIS #B1T12,BCSR ;SET BIT 12 
BIT 9B IT12,8CSR sGOT SET OK? 
BNE 3% 3IF OK, BRANCH 
MOV #BIT12,$GDDAT ;EXPECTED PATTERN 
ERROR +52 sERROR BCSR READ/WRITE BITS 
3 
; TRY TO ACCESS LKS TO GET A TIMEOUT WITH BCSR<12>=1 
3 
3$; MOV ERRVEC,R1 sSAVE TIMEOUT VECTOR 
MOV 04$ ,ERRVEC sPOINT TO PROGRAM AREA 
MOV #340, ERRVEC +2 sAT PRIORITY 7 
TST LKS sACCESS LKS REGISTER 
ERROR +66 sBCSR<12>» DOES NOY DISABLE L«S 


SEQ 0354 
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18894 
18895 
18896 
18897 
18898 
18899 


113512 
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005726 

005726 

010137 000004 

013737 002710 177520 


05-APR 
TES! - 


4$: 


Fle 
84 16:45 PAGE 356 
LINE CLOCK DISABLE 


TsT (SP )> 

TST (SP )> 

MOV R1,ERRVEC 
MOV SAVBR,8CSR 


sRESTORE STACK POINTER 


sRESTORE TIMEOUT VECTOR 
sRESTORE BCSR 


SEQ 0355 


Gle 
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COKDAB .P 11 05 -APR-84 16:45 TEST - UNCONDITIONAL CLOCK LINE INTERRUPTS 
18900 -S6TTL TEST - UNCONDITIONAL CLOCK LINE INTERRUPTS 
18901 sUNCONDITIONAL CLOCK LINE INTERRUPTS( +) 
18902 ;THIS TEST WILL CHECK THAT SETTING BCSR<13> TO 1 WILL 
18908 sREQUEST INTERRUPTS WHENEVER A CLOCK LINE IS ASSERTED. THIS 
18904 ;SHOULD HAPPEN WITHOUT ACCESSING LKS, THEREFORE, EVEN WITH BCSR<12>=1 
pees s INTERRUPTS SHOULD HAPPEN. 
‘ 
18907 ;BCSR- «13> FORCE LINE CLOCK INTERRUPT ENABLE 
18908 ; 
18909 
18910 sROUTINE TEST 
18911 ;IF UFO AND FORCE LKS NOT OISABLED THEN 
18912 S$. EXIT TEST 
18913 sENDIF 
18914 a. LET 100*ADDRESS OF UNCONDITIONAL _INTERRUPT ROUTINE 
18915 3. DO FOR BCSR<12> FROM #0 TO @1(LKS DISABLED AND ENABLED) 
18916 Bs CIF UFD DO ONLY FOR SELECTED LINE CLOCK) 
18917 3. ° CLEAR UNCONDITIONAL _INTERRUPT 
18918 3. ° SET COUNTER TO WAIT FOR 3 INTERRUPTS 
18919 Ss ° LET BCSR<13>*1 
18920 Se . REPEAT 
18921 8. . ° DECREMENT COUNTER 
18922 Be °° UNTIL UNCONDITIONAL _INTERUPT EQ #3 OR COUNTER EQ #0 
18923 8 . IF COUNTER GT TIME _REQUIRED_FOR_3_INTERRUPTS _FOR_800HZ 
18924 a. ° A ERROR CINTERRUPTS NEVER GO LOW) 
18925 . ° ENOIF 
18926 $< . IF UNCONDITIONAL __INTERRUPT LT #3 THEN 
18927 8. . . ERROR CINTERRUPTS DON’T HAPPEN) 
18928 a. ° ENDIF 
18929 $s LET BCSR<13>=00 
18930 - ENODDO 
18931 3 ENDROUT INE 
18932 ; 
18933 sROUTINE UNCONDITIONAL _INTERRUPT ROUTINE 
18934 3. INCREMENT UNCONDITIONAL _INTERRUPT 
18935 ;RETURN 
18936 
18937 PU TULITI ITT TIT irr irri rir i tri titi tii tirtirititriitirititi tit Tritt 
18938 113520 000004 TST37: SCOPE 
18939 113522 032737 000100 000052 BIT OBITO6 ,@S2 3UFD MODE ? 
18940 113530 001404 BEQ 1$ ;IF NOT, BRANCH 
18941 113532 032737 020000 177520 BIT #B1T13,BCSR sFORCE INTERRUPT SET? 
pte | 113540 001525 BEQ TST40 ssIF SET, EXIT TEST 
‘ 
pte 3 CHECK BSCR<13> TO BE O AND 1 
. 
18946 113542 013737 177520 002710 1%: MOV BCSR,SAVBR ;SAVE BCSR REGISTER 
18947 113550 042737 020000 177520 BIC #611T13,8CSR sCLEAR BCSR 
18948 113556 032737 020000 177520 BIT #61T13,B8CSR 3<13>=0? 
18949 113564 001403 BEQ es 3IF OK, BRANCH 
18950 113566 005037 001124 CLR $GODAT sCLEAR EXPECTED PATTERN 
18951 113572 104052 ERROR +52 sERROR BCSR READ/WRITE BITS 
18952 113574 052737 020000 177520 2%: BIS oB1T13,BCSR sSET BIT 13 
18953 113602 032737 020000 177520 BIT #B1T13,BCSR ;GOT SET OK? 
18954 113610 001004 BNE sIF OK, BRANCH 


3$ 
18955 113612 012737 020000 001124 MOV #B11T13,$GDDAT sEXPECTED PATTERN 
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132444 


002710 


000100 
000102 
177520 


177520 


002702 


002702 
001124 
177520 
000052 
177520 
177546 


177546 
177520 


05 - 
TEST 


3 
3$; 


10$: 


11%: 


Hie 


APR-84 16:45 PAGE 358 
- UNCONDITIONAL CLOCK LINE INTERRUPTS 
ERROR +52 
3 
; SET UP TO DO UNCONDITIONAL INTERRUPTS 

MOV #LKSINT ,8¢100 
MOV #340 ,80102 
BIS #B1T12,8CSR 
BR 5$ 
BIC #BIT12,BCSR 
CLR LKSFL 
MOV 077777,Re 
MTPS 9240 
CMP #3,LKSFL 
BEQ 7$ 
SOB R2,6$ 
MTPS #340 
CMP #77700 ,R2 
BGE 8$ 
ERROR +63 
CMP @3,LKSFL 
BGE 9$ 
MOV #3, $GDDAT 
ERROR +64 
BIT #B1T12,8CSR 
BNE 4$ 
BIT #BIT06,aeS2 
BEQ 10$ 
BIT #BIT12,BCSR 
BNE 12$ 
BIT #BITO6,LKS 
BNE 11$ 
ERROR +67 
BIC #BITO6,LKS 
MOV SAVBR,BCSR 


les: 


sERROR BCSR READ/WRITE BITS 


;SET UP INTERRUPT VECTOR 

sAT PRIORITY 7 

sFOR 1ST TIME DISABLE LKS 

:GO 00 IT 

sFOR THE 2ND TIME, ENABLE LKS 
;CLEAR INTERRUPTS FLAG 
sCOUNTER TC WAIT FOR INTERRUPTS 
sLOWER PRIORITY TO 5S 

33 INTERRUPTS HAPPENED? 

sEXIT LOOP, IF SO 

sOTHERWISE, KEEP WAITING 
sRAISE PRIORITY TO 7 

s INTERRUPTS HAPPEN TOO OF TEN? 
;IF NOT, BRANCH 

sREADY LINE DOESN'T GO LOW 

sAT LEAST 3 INTERRUPTS HAPPENED? 
sIF SO, BRANCH 

sEXPECTED DATA 

s INTERRUPTS DON’T HAPPEN 
;SECOND TIME THRU THE LOOP? 
sIF NOT, OO IT AGAIN 

sUFD MODE? 

;IF NOT, BRANCH 

;IF UFD AND LKS DISABLED? 
;D0N‘T CHECK LKS 

s INTERRUPT ENABLE LINE HOLD 1? 
:IF SO, BRANCH 

sBCSR<13> DOESN'T SET LKS<6> 
sOISABALE LKS INTERRUPTS 
sRESTORE BCSR 


SEQ 0357 
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114014 
114016 
114024 
114026 
114032 
114034 
114042 
114044 
114052 


114054 
114062 
114070 
114076 
114104 
114112 
114116 
114122 
114126 
114134 
114136 
114140 
114144 
114146 
114154 
114156 
114160 
114166 
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001220 


000052 
177520 


177546 


177546 
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- RESETTING LKS 


- RESETTING LKS 


sRESETTING LKS(#) 
;THIS TEST WILL PROVE THAT RESET INSTRUCTION SETS LKS<07> AND 


sCLEARS LKS<06>. 


sROUTINE TEST 


;IF UFD AND LKS IS DISABLED THEN 


ts 
sENDIF 


EXIT TEST 


POINT LKS VECTOR 100 TO ERROR_LKS_ILLEGAL _INTERRUPT 
SYNCHRONIZE -LKS BY WAITING FOR 3 PULSES 

LET LKS<06>=41 
CLEAR LKS (CLEARS LKS<07> 


EXECUTE 


"RE SE ij ” 


IF LKS<7> NE #1 OR LKS<6> NE #0 THEN 


ENDIF 


ERROR 


IF ILLEGAL _LINE _CLOCK_INTERRUPT NE O THEN 
ERROR 


3 
sROUTINE ERROR _LKS_ILLEGAL _INTERRUPT 
FLAG ILLEGAL _LINE CLOCK _INTERRUPT 


3. 
;RETURN 


FF FFASHSARAAAERASARSEAEASAEEESESEAEEEEHAEESEEEAEAEEEEEEEEEEEAEEESESSE 


TST40: 


2s: 


3$: 


4$: 


SCOPE 

CMPB OAPTENV, SENV 
BNE 1$ 

TST $PASS 

BNE TST41 

BIT oBITO6,@@52 
BEQ 1$ 

BIT #BIT12,BCSR 
BEQ TST41 

MOV BCSR,SAVBR 
BIC #B81T12,6CSR 
MOV @LKSINT ,8@¢100 
MOV #340,a%102 
BIS @BITO6,LKS 
CLR LKSFL 

MOV #77777,R2 
MTPS #240 

CMP #3,LKSFL 
BEQ 3$ 

SOB R2,2$ 

MTPS #340 

RESET 

BIT #BITO7,LKS 
BNE 4$ 

ERROR +70 

BIT #BITO6,LKS 
BEQ TST41 


sRUNNING IN APT MODE? 
3NO, GO DO TEST 
sFIRST PASS? 

33;IF APT AND NOT FIRST PASS, EXIT TEST 
sUFD MODE? 
:IF NOT, BRANCH 
3LKS DISABLED? 

ssIF OISABLED, EXIT TEST 


SYNCHRONISE WITH LINE TIME CLOCK By WAITING FOR 3 INTERRUPTS 


;SAVE BCSR 

sENABLE LKS RESPONSE 

3SET UP INTERRUPT VECTOR 

sAT PROIRITY 7 

3;SET INTERRUPT ENABLE BIT 

;CLEAR INTERRUPTS FLAG 

;COUNTER TO WAIT FOR INTERRUPTS 

;sLOWER PRIORITY 10 5 

33 INTERRUPTS HAPPENED? 

sEXIT LOOP, IF SO 

sOTHERWISE, KEEP WAITING 

sRAISE PRIORITY TO 7? 

sEXECUTE RESET 

sREADY BIT SET? 

;IF SO, BRANCH 

sRESET DOESN'T SET LKS<07. 

s INTERRUPT ENABLE BIT Ci EARED? 
s3sIF SO, EXIT TEST 


SEQ 0358 


Jle 
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COKDAB.P11 05 -APR-84 16:45 TEST - RESETTING LKS SEQ 0359 
19048 114170 104071 ERROR +71 sRESET DOESN’ T CLEAR LKS 
19049 


19050 


K1e2 


COKDABO KDJ11-B8 CLUSTER MACY11 30(1046) OS-APR-84 16:45 PAGE 361 
COKDAB .P11 5 TEST 


114172 
114174 
114202 
114204 
114212 
114214 
114216 
114222 


114226 
114234 
114242 
114250 
114254 
114260 
114264 
114266 
114274 
114302 
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000100 
010000 


177520 
171777 


177520 
132444 
000340 
114452 
000004 


177520 


002000 
000100 


000052 
177520 


177520 
000052 


- LINE CLOCK INTERRUPTS 


-SBTTL TEST - LINE CLOCK INTERRUPTS 

sLINE CLOCK INTERRUPTS( 4) 

sBY SETTING TO 1 LKS<06>, THIS TEST WILL CHECK FOR INTERRUPTS 

sFROM BEVENT LINE AND FROM KDJ11-B8 SOHZ, 60HZ, 8OOHZ ON BOARD SIGNALS 
;(THE LATTER SIGNALS WILL BE ACCESSED By SETTING BCSR<11-10>). 


‘ 
;BCSR ss <11> <10> CLOCK SELECT BITS 1 AND O 


; 
5 ° ie) EXTERNAL BEVENT LINE 
; 0 1 ON-BOARD 50 HZ 
H 1 ° ON-BOARD 60 HZ 
; 1 1 ON-BOARD 800 HZ 
3 
sROUTINE TEST 
IF UFD THEN 
3. IF LKS DISABLED THEN 
3. EXIT TEST 
i. ENDIF 
+ OIF SET FLAGS TO RUN ONLY WHAT SPECIFIED IN EAPROM 
; 
i LET 100=ADDRESS OF LKS_INTERRUPT 
3 DO FOR BCSR<11;10> FROM #0 TO #3 
3. . LET LKS<06>=01 
3. ° WAIT FOR 10 INTERRUPTS FOR EACH CLOCK 
i ° STORE ACTUAL NUMBER OF INTERRUPTS FOR EACH CLOCK 
3. . LET INTERRUPT _FLAG=0 
. . ENDOO 
COMPARE NUMBER OF INTERRUPTS FOR EACH CLOCK 
vENOROUT INE 


; ROUTINE LKS_INTERRUPT 
3. INCREMENT INTERRUPT _FLAG 
sRETURN 


FF FPHAASARHSAEHAASAAAAEEEASOEHHEAEEEEESEEEEEEACHEEEEAEEESCEAEEEEREDEOESE 


TST41: SCOPE 


BIT #BITO6 ,a#S2 sUFD MODE? 
BEQ 1$ :IF NOT, GO DO THE TEST 
BIT #B81T12,B8CSR LKS IS DISABLED? 
BNE TST42 :3IF DISABLED, EXIT TESTS 
CLR Re sCLEAR R2 TO SET FLAGS 
BIS BCSR,R2 sSET R2 ACCORDING TO BCSR 
BIC #171777,R2 sLEAVE ONLY BITS <11-10> 
; 
3 SETUP FOR INTERRUPTS, IN UFD MODE ONLY FROM THE CLOCK SPECIFIED IN BCSR<11-10> 
’ 
1$; MOV BCSR, SAVBR sSTORE BCSR 
MOV #LKSINT,100 ;SET UP LKS VECTOR 
MOV #340,102 sAT PRIORITY 7 
MOV @TIMDEL ,RS sPOINTER TO DEL 
MOV #4 ,R4 3R4 IS THE COUNTER FOR ALL CLOCKS 
CLR BCSR 300 FOR BEVENT LINE INTERRUPTS 
BR 3$ :GO 00 THE LOOP 
2s: ADD #2000,BCSR ;SET UP FOR THE NEXT CLOCK LINE 


3$; BIT #BITO6 ,a#Se sUFD MODE ? 
BEQ 4$ ;IF NOT, BRANCH 


SEQ 0360 


L1e 
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COKDAB.P11 05-APR-84 16:45 TEST - LINE CLOCK INTERRUPTS SEQ 0361 
19107 114304 010237 177520 MOV R2,BCSR ;IN UFD, DO ONLY FOR SPECIFIED 
19108 114310 005037 002702 4$: CLR LKSFL ;CLEAR INTERRUPT FLAG 
19109 114314 052737 000100 177546 BIS eB ITO6,LKS ;SET INTERRUPT ENABLE BIT 
19110 114322 012703 000010 MOV #10,R3 sSTART COUNTER FOR 10 INTERURRUPTS 
19111 114326 012701 177777 S$: MOV #177777,R1 :START COUNTER TO WAIT FOR INTERRUPT 
19112 114332 106427 000240 MTPS #240 sLOWER PRIORITY TO S 
19113 114336 023703 002702 6$: CMP LKSFL,R3 sNEW INTERRUPT HAPPENED? 
19114 114342 001401 BEQ 7$ sIF SO, EXIT WAIT LOOP 
19115 114344 077104 SOB R1,6$ sOTHERWISE, KEEP WAITING 
19116 114346 010125 7$; MOV R1,CR5)>+ ;STORE DELAY FOR EACH CLOCK 
19117 114350 032737 000100 000052 BIT #BITO6 ,aeS2 sUFD MODE? 
19118 114356 001026 BNE 10$ ;IF UFO, DON’T DO FOR ANY OTHER 
sonae 114360 077436 SoB R4,2$ sALL LINE CLOCKS DONE? 
1 H 
foaas ; CHECK THE DELAY VALUES FOR ALL CLOCKS 
3 
19123 114362 106427 000340 MTPS #340 sRAISE PRIORITY 
19124 114366 042737 000100 177546 BIC #BITO6,LKS sOISABLE INTERRUPTS 
19125 114374 012705 114452 MOV @TIMDEL ,RS sPOINTER TO DELAY TABLE 
19126 114400 021565 000006 CMP CRS),6CR5) sDELAY FOR BEVENT AND 800HZ? 
19127 114404 103401 BLO 8$ sBEVENT IS NOT 800HZ 
19128 114406 104064 ERROR +64 sWRONG @ OF INTERRUPTS 
19129 114410 005725 8$: TST CRS) 3; INCREMENT POINTER 
19130 114412 021565 000002 CMP (RS),2CR5) sDELAY FOR SOHZ AND 60HZ? 
19131 114416 103401 BLO 9$ ;IF FIRST BIGGER, BRANCH 
19132 114420 104064 ERROR +64 sWRONG # OF INTERRUPTS 
19133 114422 005725 9$: TST CR5S)+ s INCREMENT POINTER 
19134 114424 021565 000002 CMP CRS),2CR5) sDELAY FOR SOHZ AND 800HZ 
19135 114430 103401 BLO 10$ ;IF FIRST BIGGER, BRANCH 
19136 114432 104064 ERROR +64 sWRONG # OF INTERRUPTS 
19137 114434 013737 002710 177520 10$: MOV SAVBR,BCSR sRESTORE BCSR 
19138 114442 042737 000100 177546 BIC #BITO6,LKS sDISABLE INTERRUPTS 
fecee 114450 000404 BR TST42 ssExIT TEST 
19141 114452 000004 TIMDEL: .BLKW 4 


19142 


COKDAB 


19143 
19144 
19145 
19146 
19147 
19148 
19149 
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114462 
114464 
114472 
114474 
114476 
114504 
114506 
114510 
114516 
114520 


000004 
032737 
001401 
104132 
932737 
201001 
104132 
032737 
001401 
104132 


174000 177750 


000044 177750 


000322 177750 


OS-APR-84 16:45 PAGE 363 
TEST - MAINTENANCE REGISTER TEST 


-SBTTL TEST - MAINTENANCE REGISTER TEST 

sMAINTENANCE REGISTER TEST 

sTHIS TEST WILL ADDRESS MAINTENANCE REGISTER AND CHECK BITS 
37-4 TO BE 0010, 2-1 TO BE 10, AND READ BITS 10-08, 03, 00 
sFOR FUTURE USE. THOSE BITS REPRESENT THE FOLLOWING SIGNALS: 
sMULTIPROCESSOR SLAVE, — SYSTEM, FPA AVAILABLE, HALT/TRAP 
;OPTION, AND AC POWER OKAY 

;ROUT INE TEST 


Be IF MAINT. REG. BITS <7-4> NE 0010 OR <2-1> NE 10 THEN 
Oe ERROR 
+ ENDIF 
READ MAINT.REG. BITS <10-08,03,00> 
}ENDROUT INE 


3 FE SPAARAARAREASASEAASEAEASEMAAAEAEEAEEREEEEEESEEREEEEAAEEOSREEREEHREES 


TST42: SCOPE 


BIT #174000 ,MAIREG sUNUSED BITS ALL ZEROS? 

BEQ 1$ sIF OK, BRANCH 

ERROR +132 sMAINTENANCE REGISTER ERROR 
1$; BIT 044 ,MAIREG 3<5.2> SET ? 

BNE 2s :IF SO, BRANCH 

ERROR +132 sMAINTENANCE REGISTER ERROR 
2s: BIT #322 ,MAIREG 3<7,6,4,1> CLEAR? 

BEQ TST43 33IF YES, BRANCH 

ERROR +132 


SEQ 0362 


COKDABO KDJ11-B CLUST 
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11 


000004 
032737 
001406 
022737 
001402 
000137 


013701 


010137 


000100 
000200 
116510 


177524 


Nie 
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- SERIAL LINE UNIT REGISTERS 


-SBTTL TEST - SERIAL LINE UNIT REGISTERS 

sSERIAL LINE UNIT TEST(#) 

s;BCR<2-0> WILL BE READ TO FIND OUT BAUD RATE. SLU WILL BE PROG- 
sRAMMED TO CHECK THE INTERRUPT LEVELS BY SETTING BIT<06> IN 
sRCSR AND XMIT. LOOP BACK CAPABILITIES WILL BE TESTED BY SETTING 
3TO 1 XCSR<O2>. THE LINE CLOCK INTERRUPT SUBROUTINE WILL BE 
sUSED TO RETURN TO THE EXECUTION OF THE DIAGNOSTICS, IF THE 
;PROGRAM HANGS IN THE LOOP BACK MODE. 

sROUTINE TEST 

;IF UFD AND CONSOLE NOT PRESENT 

GO TO TEST_22 


IF BCR<O7> EQ @O0 THEN 
. READ BCR<2-0> TO GET BAUD RATE 
ENDIF ; 


; 

; 

; 

; 

3. LET 4=ADDRESS_OF TIMEOUT _ROUTINE 
3. DO FOR RCSR,XCSR,RBUF , XBUF 
; ° 
; 

; 

; 

; 

; 


ER MACY11 30(1046) 05-APR-84 16: 
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READ XRCSR,XCSR,RBUF , XBUF 
IF TIMEOUT_FLAG NE #0 THEN 
ERROR 


ENDIF 


S 
sROUTINE TIMEOUT 
. LET TIMEOUT _FLAG=¢1 
; ENDROUT INE 
MPTITITITITITITITTITITITTTTitiTiTitiiiiiiitititti itt ttt titty 
TST43: SCOPE 

BIT BI TO6 8°52 UFO MODE? 


; ? 
BEQ 1s :IF NOT, GO OO THE TEST 
BIT “BITO7,BCR ;IF UFO AND CONSOLE NOT PRESENT 
BEQ 1s sNOT TRUE, DO THE TEST 
JMP SLEND sIF TRUE, SKIP ALL SLU TESTS 

; 

; TRY TO ACCESS SLU REGISTERS 

; 

18: MOV ERRVEC.R1 sSAVE TIMEOUT VECTOR 


MOV 03% ,ERRVEC sPOINT NEW ONE TO PROGRAM AREA 
MOV 0340, ,.ERRVEC +2 sAT PRIORITY 7 
MOV ORCSR ,R2 . sSTART ACCESSING WITH RCSR 
2s: TsT (R2) ACCESS SLU SC TSTER 
BR 4% IF NO TIMEOUT, CONTINUE 
38: MOV R2, SBODAT sSTORE ADDRESS THAT TIMED OUT 
ERROR +72 s TIMEOUT ACCESSING SLU REGISTER 
4%: cmp oxBuF .CR2)+ sLAST REGISTER ACCESSED? 
BLO es 2 ;IF NOT, SRANCH 
MOV R1, ERRVEC sRESTORE | iMEOUT VECTOR 


SEQ 0363 
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19220 
1922 

19222 
19223 
19224 
19225 
19226 
19227 
19228 
19229 


cLU 


8 Ss 
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001000 
000001 


001206 
177564 


177564 


000000 
177564 
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001220 


177566 


B14 
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TEST. XCSR BIT ? 


-SBTTL TEST - XCSR BIT 7 
sCHECK THAT XCSR<O7>» CAN BE O AND 1. 


3 
3xCSR <O7> TRANSMITTER READY 
3 
sROUTINE TEST 
Rs WAIT FOR XCSR<0O7>*01 NO MORE THAN 200MSEC 
ie IF xCSR<O7> NE 1 THEN 
as . ERROR 
‘ ENOIF 
P LET BUF -@NULL 
. WAIT FOR XCSR<O7><01 


LET XBUF = ONULL 


IF xCSR<O7> NE O THEN 
° ‘ ERROR (READY DION‘ T GO LOW) 
‘ ENDIF 
ENDROUT INE 


FESSCSSHSSHSHSHSSSSHSHASSSHEHHOHHESHSHSSEHSEHHEESEHEHEHEEESEHSEHHEEHESESESEOEE 


TST44; SCOPE 


MOV #1000,R1 sCOUNTER FOR ABOUT 2OOMICROSEC. 
CMPB OAPTENV, SENV sRUNNING IN APT MODE? 
BNE i$ sNO, GO OO TEST 
TST $PASS 3F IRST PASS? 
BNE TST45 33If APT AND NOT FIRST PASS, EXIT TEST 
1%: TSTB xCSR 3XCSR<7> READY 1? 
BMI 2s sIF SO, EXIT WAIT LOOP 
SOB R1,1$ 3sIF NOT 1, CONTINUE WAITING 
2s: TST8 xCSR sXCSR<7>#1? 
BMI 3% 3sIF YES, BRANCH 
ERROR 73 sxCSR<7> DOES NOT BECOME 1 
38; MOV ONULL , XBUF 3TRyY TO TRANSMIT NULL CHARACTER 
TST8 xCSR sXCSR<7?>#0 
BPL TST45 ssI*t ve >, ExIT TEST 
ERROR ? s*MIT READY DION’? GO LOW 


SEQ 0364 
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19257 
19258 
19259 


114702 
114704 
114710 
114716 
114720 
114724 
114726 
114732 
114734 
114742 
114750 
114752 
114756 
114760 


114762 
114766 
114772 
114774 
114776 
115000 


115004 
115012 
115016 
115022 
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012701 
105737 
100402 
077104 
000402 
005737 


012737 
012701 
105737 
100401 


001220 


177564 
177564 


177566 


8% 
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TEST - RCSR BIT 7 AND XCSR BIT 2 


-SBTTL TEST - RCSR BIT 7 AND XCSR BIT 2 
sCHECK THAT RCSR<07> CAN BE O AND 1 AND THAT xCSR<O2> WORKS PROPERLY. 


5 
sRCSR-—<O7> RECEIVER DONE 
sxCSR- =< O2> MAINTENANCE 


3 
sROUTINE TEST 
3.( CHECK RCSR<O7> AND XCSR<07>) 


i. WAIT FOR XCSR<07>=01 

ge LET XCSR<02>*@1 (LOOP BACK MODE ) 

gs LET XBUF °@125 

Ri WAIT FOR RCSR<0O7>=01 NO MORE THAN 2OOMSEC 
Be IF RCSR<O7> NE 01 THEN 

is . ERROR (RCSR<07>» DOES NOT BECOME 1 OR XCSR<02>D0ES NOT 
t. . WORK ) 

is ENOIF 

Ss IF RBUF NE 0125 THEN 

Be " ERROR 

8. ENDIF 

ts IF RCSR<O7> NE 00 THEN 

Bs 2 ERROR (RCSR<07>D0ES NO’ GO LOw) 
a ENDIF 

is LET xCSR<02>=200 

3 ENDROUI TNE 


FF SSSSSSSSHSSASHSHHSSSSHHEHEHSHEEHSHEHHEEEHEESHESESEESEEHEESHEEHEEESEEOESE 


TST4S: SCOPE 
MOV 013,R1 sCOUNTER FOR ABOUT 200MICROSEC. 
CMPB @APTENV, SENV sRUNNING IN APT MODE? 


BNE 1$ sNO, GO DO TEST 
TsT $PASS sFIRST PASS? 
BNE TST46 33If APT AND NOT FIRST PASS, EXIT TEST 
1$: TsT8 xCSR 3XCSR<7> READY 1? 
BPL 1$ sIF NOT 1, CONTINUE WAITING 
2s: BIS #BITO?],xCSR 3SET LOOP BACK MODE 
BIT oBITO2,xCSR 3GOT SET OK? 
BNE 3$ 3IF YES, BRANCH 
CLR xCSR sRESET TO PRINT ERROR 
ERROR +114 sxCSR<2> DOES NOT BECOME 1 
BR TST46 ssExIT TES? 
3 
3 STALL FOR A WHILE IN CASE XCSR<2> CAUSES RCSR<7> TO BE 1 
3 
3$; MOV 92000 ,R1 sSTALL IN CASE xCSR<2> SETS READY 
4$; TSTB RCSR 3IF RECEIVER READY SET? 
BMI S$ 3IF SET, BRANCH 
SOB Ri,4$ ;OTHERWISE, STAY ©OR A WHILE 
BR 6$ 3IF NOT READY, BRANCH 
S$: TsT RBUF sREAD RBUF 
+ 
3 TRANSMIT XON AND CHECK RCSR< 7> 
; 
63%: MOV 021, XBUF ; TRANSMIT 4 CHARACTER 
MOV 2000 ,R1 s;COUNTER TO WAIT 
7$;: 1ST8 RCSR 3RCSR<?> READY 1? 


BMI 8% sIF YES, EXIT WAIT Loup 


SEQ 0365 


D1 4 
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COKDAB.P 11 O5-APR-84 16:45 TES! RCSR BIT 7 AND XCSR BIT 2 SEQ 0266, 
19318 115024 077104 508 R1,78 s;OTHERWISE, CONTINUE WAITING 
19314 115026 105737 177560 8s; TSTB RCSR sRCSR<7>=1? 
19315 115032 100403 BMI 9$ ;IF YES, BRANCH 
19316 115034 005037 177564 CLR xCSR sRESET XCSR<2> 
19317 115040 104074 ERROR +74 sRECEIVER READY DION’ T COME UP 
19318 115042 013737 177562 001126 9%: MOV RBUF , $BDDAT s;STORE RECEIVED DATA 
19319 115050 022737 000021 001126 CMP 21, $BDDAT sDATA RECEIVED OK? 
19320 115056 001406 BEQ 10$ sIF YES, BRANCH 
19321 115060 012737 000021 001124 MOV 021, $GDDAT 
19322 115066 005037 177564 CLR xCSR sRESET TO ENABLE SLU 
19328 115072 104075 ERROR +75 sWRONG CHARACTER RECEIVED 
193204 115074 105737 177560 10$: TSTB RCSR sRCSR<7>=0? 
19325 115100 100003 BPL 118 sIF ZERO, BRANCH 
192326 115102 005037 177564 CLR xCSR sRESET TO ENABLE SLU 
19827 115106 10407 ERROR +76 sRCSR<O7><>0 AFTER READING RBLF 
19528 115110 042737 000004 177564 118: BIC BITO2,xCSR DISABLE LOOP BACK MODE 


19330 


E13 
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19331 .SBTTL TEST - RESET AND XCSR<2!0> 
19332 ;CHECK THAT RESET CLEARS XCSR<O!2>, 
19333 sROUTINE TEST 
19334 3.(CHECK RCSR<O7> AND <XCSR<0O7> AND RESET) 
19335 S~ LET XCSR<02,00>+#1 (LOOP BACK MODE ) 
19336 be EXECUTE “RESET” 
19337 ve IF xCSR<02!00> NE #0 THEN 
19338 is ‘ ERROR 
19339 Be ENDIF 
19340 Rs LET XCSR<02>=0#0 
19341 s ENDROUT INE 
19342 
19343 FEMFOSSAHSSEHEHSESHEHEEEAEEHHEESEHESEEHEHESEHESEOEEESEEEEEEEESESESEEEE 
19344 115116 000004 TST46: SCOPE 
19345 115120 122737 000001 001220 CMPB OAPTENV, SENV sRUNNING IN APT MODE? 
19346 115126 001003 BNE 1$ sNO, GO DO TEST 
19347 115130 005737 001206 TsT $PASS sF IRST PASS? 
19348 115134 001011 BNE TST47 :3IF APT AND NOT FIRST PASS, EXIT TEST 
prot 115136 052737 000005 177564 18: BIS #BITO2]!BITOO,xCSR sLOOP BACK MODE 
3 
eee! ; EXECUTE RESET AND VALIDATE THAT xCSR<7,2> BECOMES <1,0> 
1 2 H 
19353 115144 000005 RESET sEXECUTE RESET 
19354 115146 032737 000005 177564 BIT @BITO2!BITOO,xCSR 3xCSR<2,0> CLEAR? 
19355 115154 001401 BEQ TST47 s3IF YES, BRANCH 
Bee: 115156 104102 ERROR +102 3xCSR<2,0>» NOT CLEARED ON RESET 


- RESET AND xCSR<2!0> 


SEQ 0367 
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115160 
115162 
115170 
115172 
115176 


115200 
115206 
115214 
115216 
115220 
115226 
115234 
115236 
115240 
115242 
11525¢ 
115252 
115254 
115262 
115264 
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000004 
122737 
001003 
005737 
001033 


052737 
032737 
001001 
104110 
052737 
032737 
001001 
104110 


000005 
032737 
001401 
104102 
032737 
001401 
104102 


000001 
001206 


900100 
090100 


000100 
000100 


000100 


000100 


001220 


177564 
177564 


177560 
177560 


177564 


177560 


ris 
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TEST RESET AND INTERRUPT ENABLE BITS 
-SBTTL TEST - RESET AND INTERRUPT ENABLE BITS 
;CHECK THAT INTERRUPTS DON’T HAPPEN AT PRIORITY 4 AND THAT RESET 
sCLEARS XCSR<06> AND RCSR<06>. 


$ 
sRCSR = < 06> RECEIVER INTERRUPT ENABLE 
+xCSR = <06> TRANSMITTER INTERRUPT ENABLE 


‘ 
sROUTINE TEST 


3. LET 60*@ADDRESS_OF ILLEGAL INTERRUPT xRCSR 
3. LET 64*@ADDRESS_OF _ILLEGAI INTERRUPT _xRCSR 


re SET PRIORITY TO 4 

ts LET xCSR<O02>*@1 (LOOPBACK MODE ) 

3 LET XCSR<06>*@1 CENABLE TRANSMIT INTERRUPTS) 

H LET RCSR<06>=01 (ENABLE RECEIVE INTERRUPTS) 

Fy WAIT FOR XCSR<07>+01 (READY TO TRANSMIT) 

3. LET XBUF=@NULL (SEND A CHARACTER) 

Se WAIT FOR ILLEGAL INTERRUPTS (ABOUT 2O00MSEC ) 

ie EXECUTE “RESET” 

; IF xCSR<06> NE #0 OR RCSR<06> NE #0 OR XRCSR NE 80 THEN 
3 ‘ ERROR 

3 
3 
8 


° ENOIF 
, RESTORE PRIORITY TO NORMAL 
ENOROUT INE 


‘ 

sROUTINE ILLEGAL _INTERRUPT XRCSR 
&. INCREMENT XRCSR 

s ENDROUT INE 


FE SHSSHNSHASHASSSSSESSHESESEHEEHESHEHHSOSSEESESHEEESESESESSESEEHEEEEEEEHESE 


TST47; SCOPE 
CMPB 


@APTENV, SENV sRUNNING IN APT MODE? 
BNE 1$ sNO, GO DO TEST 
TST $PASS sFIRST PASS? 
BNE S$ ;SKIP RESET PART OF THE TEST 


CHECK THAT INTERRUPTS ENABLE BITS FOR RECEIVER AND TRASMITTER OF SLU 
ARE CLEARED By RESET 


oe oe os os 


$: BIS #B1106,xCSR sSET INTERRUPT ENABLE BIT IN xCSR 

BIT @B1TO6,xCSR ;GOT SET OK? 
BNE es :IF YES, BRANCH 
ERROR *110 ;IN BIT 6 OF XCSR 

2s: BIS BI TO6,RCSR ;SET INTERRUPT ENABLE BIT IN RCSR 
BIT oB1TO06,RCSR 3GOT SET OK? 
BNE 3$ :IF YES, BRANCH 
ERROR +110 :IN BIT 6 OF RSCR 

3$: RESET s INLINE BUS RESET 
BIT #BIT06,xCSR sXMIT INTERRUPT ENABLE BIT CLEARED? 
BEQ 4$ :IF CLEARED, BRANCH 
ERROR 102 s INTERRUPT ENABLE NOT CLEARED ON RESE’ 

4s: BIT oe ITO ,.RCSR sRECEIVE INTERRUPT ENBLE CLEARED? 
BEQ 5$ sIF CLEARED, BRANCH 


ERROR +102 s INTERRUPT ENABLE NOT CLEARED ON RESET 
; 
3 CHECK THAT TRANSMIT INTERRUPTS DON T HAPPEN AT PRIORITY HIGHER THAN 8 


SEQ 0368 
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19415 
19416 
19417 
19418 
19419 


115266 
115274 
115302 
115310 
115314 
115316 
115322 
115324 
115330 
115332 
115334 
115336 
115340 
115342 
115346 
115350 
115354 


115522 
115526 


012737 


022702 
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TEST - 


000064 
0C0066 
177564 


177564 
000060 
000062 
177566 
177560 


177564 


177564 


177560 


177564 


S$: 


16$: 


; CLEAN 
3 


17$: 


188; 


G14 
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RESET AND INTERRUPT ENABLE BITS 


sPOINT XMIT VECTOR TO PROGRAM AREA 
sAT PRIORITY 7 

sSET INTERRUPT ENABLE BIT IN XCSR 
sSET PRIORITY TO 7 

sGO WAIT IN CASE OF INTERRUPTS 
sLOWER PRIORITY LEVEL 

sSET PRIORITY 

;TIME DELAY 

sWAIT FOR INTERRUPTS 

sIF INTERRUPTS DION’ T HAPPENED, BRANCH 
s INTERRUPTS HAPPEN AT WRONG PRIORITY 
;CLEAN UP THE STACK 


sAT PRIORITY 4? 

sIF NOT LAST ONE, CONTINUE 
sRESTORE PRIORITY 7 

;CLEAR INTERRUPT ENABLE BIT 


THAT RECEIVE INTERRUPTS DON'T HAPPEN AT PRIORITY HIGHER THAN 3 


MOV 99% ,8064 
MOV 0340, 8066 
BIS OBI TO6,xXCSR 
MOV #340 ,R2 
BR 7$ 
SuB 940 ,R2 
MTPS Ro 
MOV #26,R3 
S08 R3,8$ 
R 10$ 
ERROR 101 
TST (SP )-+ 
TST (SP )> 
CMP 9200 ,R2 
BNE 63 
MTPS #340 
BIC #BITO6,xCSR 
MOV #15$ ,a060 
MOV 9340 ,8062 
TSTB xCSR 
BPL 11$ 
MOV @NULL , XBUF 
BIS #BITO6,RCSR 
MOV 340,R2 
BR 13$ 
SuB 040 ,R2 
BIS #BITC2,xCSR 
MTPS R2 
MOV #100,R3 
SoB R3,14$ 
BR 16$ 
BIC #BITO2?,xCSR 
ERROR +101 
TST (SP )- 
TST (SP )- 
CMP #200,R2 
BNE 12$ 
UP BEFORE NEXT TEST 
MTPS 9340 
BIC #BITO6,RCSR 
MOV #300,Re2 
TSTB RCSR 
BMI 18$ 
S08 R2,17$ 
TsT RBUF 
BIC #BITO2,xCSR 


sPOINT RECEIVE VECTOR TO PROGRAM AREA 
sAT PRIORITY 7 

; TRANSMITTER READY 

3;IF NOT, WAIT 

3TRY TO TRANSMIT NULL 

;SET INTERRUPT ENABLE BIT IN RCSR 
sSET PRIORITY TO 7 

;GO WAIT IN CASE OF INTERRUPTS 

sLOWER PRIORITY LEVEL 

;SET LOOP BACK MODE 

;SET PRIORITY 

sTIME DELAY 

sWAIT FOR INTERRUPTS 

;IF INTERRUPTS DION’ T HAPPENED, BRANCH 
:CLEAR LOOP BACK MODE 

; INTERRUPTS HAPPEN AT WRONG PRIORITY 
;CLEAN UP THE STACK 


sAT PRIORITY 4? 
;IF NOT LAST ONE, CONTINUE 


sRESTORE PRIORIT?: 7 

;CLEAR INTERRUPT ENABLE BIT 
sSTALL DELAY 

sRECEIVE READY? 

3STOP WAITING, IF SO 
sOTHERWISE, STAY IN THE LOOP 
sREAD CHARACTER TRANSMITTED 
sCLEAR LOOP BACK MODE 
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115534 
115536 
115544 
115546 
115552 


115554 
115562 
115570 
115576 
115604 
115612 
115616 
115622 
115624 
115626 


115632 
115636 
115640 


012702 
000402 
162702 
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001220 


H1 4 
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TEST - INTERRUPT PRIORITY FOR SLU 


-SBTTL TEST - INTERRUPT PRIORITY FOR SLU 
;CHECK THAT INTERRUPTS HAPPEN AT PRIORITY 3 AND THAT THEY CLEAR 
sRCSR<06> AND XCSR<06>. 


; 
sROUTINE TEST 


Ss LET 60=@ADDRESS _OF LEGAL _RINTERRUPT 
- LET 64=*@ADDRESS_OF LEGAL _XINTERRUPT 
ie LET xCSR<02>-01 

Gs SET PRIORITY TO #3 

be WAIT FOR XINTERRUPT=#3 

is IF xCSR<O7> EQ #1 THEN 

8. ‘ ERROR 

ie ENDIF 

te WAIT FOR RINTERRUPT =03 

Be IF RCSR<O7> EQ #0 THEN 

fie ‘ ERROR 

Be ENDIF 

~~ LET xCSR<02>=00 


SET PRIORITY TO NORMAL 


zENOROUT INE 


;ROUT INE LEGAL _XINTERRUPT 
+ LET XBUF =@CHARACTER 
INCREMENT XINTERRUPT 


ZENOROUT INE 


;ROUTINE LEGAL __RINTERRUPT 
READ RCSR 


INCREMENT RINTERRUPT 


;ENDROUT INE 


FF SSASASSHAHAREHSSEHASEAEEEEHASEEEEESHEESEAEEEHESEEESEHEHESOEAEAESEEEESHE 


TSTSO: 
BNE 
TST 
BNE 

3 

; GET READY 


3 
100$: 


MO 
1$: TSTB 


2s: TST 


SCOPE 
CMPB 


FOR 


@APTENV, SENV 
100$ 


$PASS 
TSTS1 


INTERRUPTS 


28% ,8060 
63,3064 
€340,9062 
#340 , 8066 
#BITO2,xCSR 


3 
3; SET PRIORITIES AND XMIT INTERRUPTS 
é 


3$;: SUB 


#140,R2 
4$ 
#40,R2 


sRUNNING IN APT MODE? 
:NO, GO DO TEST 
sF IRST PASS? 


33IF APT AND NOT FIRST PASS, EXIT TEST 


sSTORE RECEIVER VECTOR 

sSTORE TRANSMITTER VECTOR 

sAT PRIORITY 7 

sFOR RECEIVER AND TRANSMITTER 
3SET LOOP BACK MODE 

;DELAY FOR UNEXPECTED CHARACTERS 
sRECEIVER READY? 

:IF YES, BRANCH 

sOTHERWISE, WAIT JUST IN CASE 
sREAD RECEIVER 


;START WITH PRIORITY 3 
;TRY TO DO IT 
sLOWER PRIORITY 


SEQ 0370 


COKDABO KDJ11-B8 CLUSTER MACY11 
COKDAB.P11 


115742 
115744 


115750 
115752 
115754 
115760 
115762 
115764 
115770 
115776 


106402 
052737 
012703 
077301 
042737 
104107 
000443 


005 726 
005726 
042737 
012737 
052737 


05-APR-84 16:45 


000100 
000100 


000004 


30( 1046) 05-APR-84 
TEST - 


177564 


177564 


177564 
177566 
177560 


177564 


177560 


4$: MTPS R2 
BIS #BITO06,xXCSR 
MOV #100,R3 
S$: S08 R3,5$ 
BIC #BITO2],xCSR 
ERROR +107 
BR TSTS1 
é 
; TRANSMITTER INTERRUPT HERE 
é 
6$: TsT (SP )+ 
TsT (SP )+ 
BIC “BITO6,XCSR 
MOV @NULL , XBUF 
BIS @BITO6,RCSR 
MTPS Re 
MOV #20000 ,R3 
7$: soB R3,7$ 
BIC #BITO2,xCSR 
ERROR +107 
BR 9$ 
MTPS 9340 


; 
8$: TST 


9$: TST 


113 
16:45 PAGE 372 
INTERRUPT PRIORITY FOR SLU 


340 
#BITO6,RCSR 
xCSR 


sTRY TO DOO AT LOWER PRIORITY 
sLOOP BACK € INTERRUPT ENABLE 
sWAIT DELAY FOR INTERRUPTS 
sWAIT FOR XMIT INTERRUPTS 
sCLEAR LOOP BACK BIT 

NO XMIT INTERRUPTS 


a 
ssIF ERROR, EXIT TEST 


sCLEAN UP STACK 


sCLEAR INTERRUPT ENABLE 

3; TRANSMIT NULL 

sSET RECEIVE INTERRUPT 

;SET NEXT PRIORITY 

sWAIT DELAY FOR INTERRUPTS 
sWAIT FOR RECEIVE INTERUPTS 
;CLEAR LOOP BACK MODE BIT 
sNO RECEIVE INTERRUPTS 
:DON'T TOUCH STACK 

sRAISE PRIORITY 


;CLEAN UP STACK 


sREAD RECEIVER BUFFER 
sPRIORITY O 

3IF NOT YET, CONTINUE 

sRAISE PRIORITY TO 7 

sCLEAR RECEIVE INTER. ENABLE 
sCLEAR XCSR 


SEQ 0371 


COKDABO KNJ11-B8 CLUSTER MACY11 30( 1046) 


COKDAB.P11 


19557 


116002 


116004 
116012 
116014 
116020 


116070 
116074 


05-APR-84 16:45 


032737 
001127 
005737 
001124 


052737 
013737 
042737 
052737 
032737 
001001 
104110 
012701 
105737 
100401 


000200 
001206 


000052 


177564 
002710 
177520 
177564 
177564 


0S - APR - 
TEST 
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J13 
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BREAK CONDITION 


TEST - BREAK CONDITION 


s;CHECK THAT SENDING BREAK CAUSES FRAMING ERROR. 


3 
sRCSR 
3 
3 


3 
:XCSR 


<15> ERROR 
<13> FRAMING ERROR 
<11> RECEIVED BREAK 


<00> TRANSMIT BREAK 


é 
sROUTINE TEST 


LET XCSR<02>=41 

LET xCSR<00>=41 

WAIT FOR RCSR<07>=41 

IF RBUF<15!13!11> NE #1 THEN 

bow ERROR CERROR, FRAMING ERROR, RECEIVE BREAK NE 1) 
LET XCSR<00>=#0 

IF xXCSR<O00> NE #0 THEN 

naw ERROR (XCSR<0O0> DOES NOT GO LOW) 


WAIT FOR XCSR<O7>=41 
LET XBUF=@NULL (SEND NULL CHARACTER TO SEE ERROR CLEARED) 
WAIT FOR RCSR<07>=#1 


IF RBUF<15!13!11> NE #0 THEN 
. ERROR 
ENDIF 


LET XCSR<00>=41 

EXECUTE “RESET” 

IF XCSR<OO> NE #0 THEN 
ERROR 


ENDIF 
. LET XCSR<02>=00 
ENDROUT INE 
SEPARA ARHEAEEREEEEEEEAAHEHEESEEEEEEEROEERERHESEEEEOOEEEHEEEEEEES 
TSTS1: SCOPE 
3 
; DECIDE WHETHER TO RUN THIS TEST 
é 
BIT #BITO7,a0S2 sUFD MODE? 
BNE TSTS2 33IN UFD MODE, EXIT TEST 
TST $PASS sFIRST PASS? 
BNE TSTS2 33IF APT AND NOT FIRST PASS, EXIT TEST 
a 
; SEND BREAK AND CHECK ERROR BITS IN RBUF 
3 
18; BIS #B1TO2,xXCSR ; TRANSMIT IN LOOP BACK 
MOV BCSR,SAVBR ;SAVE BCSR 
BIC #BITO9,BCSR sDISABLE HALT ON BREAK 
BIS #BITOO,xCSR ;SET SEND BREAK BIT 
BIT #BITOO,xXCSR :GOT SET OK? 
BNE 2s 3;IF YES, BRANCH 
ERROR +110 sWRITING 1 TO XCSR<O> 
2s; MOV #100,R1 sSTALL DELAY 
4%: TSTB RCSR sRECEIVER READY? 


BMI 5$ ;IF YES, BRANCH 


SEG 0372 


K13 


COKDABO KDJ11-8 CLUSTER MACY11 30(1046) 05-APR- ga 6:45 pace 374 
COKDAB.P11 05-APR-84 16:45 TES! ak’ éOND SEQ 0373 
19613 116076 077104 S08 R1,4$ sWAIT JUST IN CASE OF A CHARACTER 
19614 116100 005737 177562 5$: TST RBUF sREAD A CHARACTER 
19615 116104 052737 000001 177564 BIS @BITOO,xCSR ; TRANSMIT BREAK 
19616 116112 012701 001000 MOV #1000,R1 sANOTHER DELAY TO GET BREAK 
19617 116116 077101 6$: SOB R1,6$ ;WAIT A WHILE 
19618 116120 105737 177560 7$ TSTB  ~—s RCSR ;RECEIVER READY? 
19619 116124 100375 BPL 7$ ;IF NOT, WAIT 
19620 116126 013737 177562 001126 MOV RBUF , $BDDAT ;STORE WHATEVER RECEIVED 
19621 116134 022737 124000 001126 CMP @BIT15!BIT13!B1T11, $BDDAT ;ALL ERROR BITS SET? 
19622 116142 001405 BEQ 8s ;IF YES, BRANCH 
19623 116144 042737 000004 177564 BIC @BITO2,xCSR ;RESET TO ENABLE SLU 
19624 116152 104105 ERROR +105 ;BREAK DOES NOT CAUSE ERRORS 
19625 116154 000446 BR TST52 33EXIT 
19626 116156 042737 000001 177564 8%: BIC #B1T00,xCSR ;CLEAR TRANSMIT BREAK 
19627 116164 032737 000001 177564 Bit @BITOO,xCSR ;GOT CLEARED OK? 
19628 116172 001405 BEQ 9$ :IF YES, BRANCH 
19629 116174 042737 000004 177564 BIC @BITO2,xCSR ;RESET TO ENABLE SLU 
19630 116202 104110 ERROR +11 sERROR WRITING O TO xCSR<O> 
19631 116204 000432 BR TSTS2 ssEXIT 
3 
19633 ; CHECK THAT BREAK CONDITION IS CLEARED 
3 
19635 116206 013737 002710 177520 9%: MOV SAVBR,BCSR sRESTORE BCSR 
19636 116214 105737 177564 10$: TSTB XCSR ;XMIT READY? 
19637 116220 100375 BPL 10$ ;IF NOT, WAIT 
19638 116222 012737 000177 177566 MOV #177, XBUF ;TRY TO TRANSMIT DELETE 
19639 116230 105737 177560 11$: TSTB ~— RCSR ;RECEIVER READY 
19640 116234 100375 BPL 118 3IF NOT, WAIT 
19641 116236 013737 177562 001126 MOV RBUF , $BDDAT ;STORE RECEIVE BUFFER 
19642 116244 032737 124000 001126 BIT @B1T15!B1/13!BIT11, $BDDAT sERRORS CLEARED? 
19643 116252 001404 BEQ 12$ ;IF YES, BRANCH 
19644 116254 042737 000004 177564 BIC eBITO2,xCSR ;RESET TO ENABLE SLU 
19645 116262 104106 ERROR +106 ;BREAK NOT CLEARED ON NEXT CHARACTER 
19646 116264 042737 000004 177564 12%: BIC #BITO2,xCSR ;CLEAR LOOP BACK MODE 


COKDABO KDJ11 68 CLUSTER MACY11 30( 1046) 


COKDAB .P11 


116272 


OS-APR-84 16:45 


000300 
177564 


001220 


177564 


177566 


177566 


001126 
001124 
001126 
177564 


001127 
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TEST - OVERRUN CONDITION 


sCHECK OVERRUN CONDITION 


H 
:RCSR 


<14> OVERRUN ERROR 


: 
sROUTINE TEST 


LET XCSR<02>=#1 CLOOPBACK MODE ) 

WAIT FOR XCSR<O7>=#1 

LET XBUF =#252 

WAIT FOR XCSR<07>=01 

LET XBUF=#125 (SEND THE 2ND W/O READING THE 1ST CHARACTER) 
WAIT FOR RCSR<O7>=@1 


STALL FOR LOWEST BAUD RATE TO GET 2ND CHARACTER 
IF LOW BYTE OF RBUF NE #125 THEN 
ERROR (1ST CHARACTER WASN'T OVERRUN) 


IF RBUF<15!14> NE @1 THE 


ENDIF 


ENDIF 


N 
ERROR (NO OVERRUN BIT SET) 


WAIT FOR XCSR<07>=01 

LET XBUF =@NULL 

WAIT FOR RCSR<O7>=01 

IF RBUF<15!14> NE #0 THEN 
ERROR (WASN'T CLEARED ON THE NEXT CHARACTER RECEIVED) 


‘ ENDIF 
P LET XCSR<02>=4#0 
ENDROUT INE 
5 EAPO RHAAAHEEEEAREREAEEEEEEEEEEAOEEEDEAEDEEESEEEOEEEEEEEDEEEEEEEE 
TSTS2: SCOPE 
CMPB #APTENV, SENV sRUNNING IN APT MODE? 
BNE 100$ sNO, GO DO TEST 
TST $PASS sFIRST PASS? 
BNE TSTS3 3;IF APT AND NOT FIRST PASS, EXIT TEST 
100$; BIS #BITO2,xCSR ;SET LOOP BACK MODE 
1$: TSTB xCSR sREADY TO TRANSMIT? 
BPL 1$ ;IF NOT, WAIT 
MOV #21, XBUF ; TRANSMIT A CHARACTER 
2s: TSTB RCSR sRECEIVE READY? 
BPL es :IF NOT, WAIT 
3$: TSTB xCSR sREADY TO TRANSMIT? 
BPL 3$ ;IF NOT, WAIT 
MOV #177, XBUF ; TRANSMIT THE 2ND CHARACTER 
MOV #10000 ,R3 ;STALL FOR THE 2ND CHARACTER 
4$: SOB R3,4$ ;WAIT A WHILE 
MOV RBUF , $BDDAT s;STORE RECEIVED DATA 
MOV #140177, $GDDAT sEXPETED PATTERN 
CMPB #177, $BDODAT 32ND CHARACTER RECEIVED? 
BEQ 5$ ;IF YES, BRANCH 
BIC #BITO2,xXCSR sRESET TO ENABLE SLU 
ERROR +111 s2ND CHARACTER DION’ T OVERRUN LST 
S$: CMPB #BIT7!BIT6, $BDDAT +1 s;OVERRUN ERROR BITS SET? 
BEQ 6$ ;IF YES, BRANCH 
CLR XCSR sRESET TO ENABLE SLU 
ERROR +112 s;OVERRUN DOES NOT SET ERRORS BITS 
BR TST53 s3EXIlT 


SEQ 0374 


COKDABO KDJ11-B8 CLUSTER 
COKDAB .P11 


19705 
19706 
19707 
19708 
19709 
19710 
19711 
19712 
19713 
19714 
19715 
19716 
19717 
19718 
19719 


116510 


O5 - APR -84 


105737 
100375 
012737 
105737 
100375 
032737 
001404 
042737 
104113 
042737 


MACY11 30( 1046) 


16:45 


177566 


177562 
177564 
177564 


BS ee ~ 


Est 


M13 


16:45 PAGE 376 


- OVERRUN CONDITION 


. 
+ SEND NEXT CHARACTER TO CLEAR OVERRUN CONDITIONS 


3 
6$: 


7$: 


8$: 
SLEND: 


xCSR 

6$ 
@NULL , XBUF 
RCSR 


7$ 
S lceeimeantla pie 
#BITO2],xCSR 


+113, 
#BITO2,XCSR 


; TRANSMITTER READY? 

;IF NOT, BRANCH AND WAIT 

; TRANSMIT NULL CHARACTER 

sRECEIVER READY? 

3IF NOT, BRANCH AND WAIT 

sANY ERRORS SET? 

sIF NOT, BRANCH 

sRESET TO ENABLE SLU 

sOVERRUN NOT CLEARED ON NEXT CHAR. 
;CLEAR LOOP BACK MODE BIT 


;LAST SLU TEST 


SEQ 0375 


COKDABO KDJ11-B CLUSTER MACY11 30(1046) O5-APR 
COKDAB .P11 


19720 
19721 
19722 
19723 
19724 
19725 
19726 
19727 
19728 


116510 
116512 


0S -APR-84 16:45 


000004 
177777 


001170 
177562 
000004 
000377 


044124 
020123 
0521235 
047440 
051101 
023504 


050131 
020131 


000052 


001220 


177560 


TEST 
. SBTTL 


N13 
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TEST 


;LED'S ON 
sTHIS TEST WILL INITIALIZE BOR TO CONTAIN A ROTATING PATTERN 
sDISPLAYED IN LED'S. 


° 

sROUTINE TEST 
WHILE A KEY NOT RECEIVED FROM KEYBOARD DO 
STALL ALLOWING TIME TO SEE PATTERN 
ROTATE LEFT TO LIGHT UP NEXT LED’S 


i. ENODO 
s ENDROUT INE 


- LED'S ON 


FF A*SSAASHASHSHHSHHAOSEHAEEAEESEEHREEAEEEEEESESESEEEEEHAESEAEEHESCEEEESEEEE 


TSTS3: 


1$: 
2s: 


3$: 
4%: 


S$: 
6$: 


LECS: 


SCOPE 
Cc 


-ASCIT 


-ASCIZ 


RS 
yw cosmte 
$PASS 


1$ 
OAPTENV, SENV 


@177777,R2 
R2,4% 
R3,38 


R1 
R428 
RS 


6$ 

. SBELL 
18 
RBUF 
04,SP 


2377,80R 
T5754 


s3sEXIT TEST 


sFLAG IN NO INTERRRUPT MODE 
;IF RUNNING IN CHAIN MODE 
;SKIP PRINTOUTS 

31ST PASS? 

:IF NOT, SKIP PRINTOUTS 

sAPT MODE ? 

;YES, SKIP PRINTOUT'S 

;CLEAR FLAG IN INTERRUPT MODE 


; IDENTIFY THE TEST 
sRECEIVE SLU VECTOR 
;AT PRIORITY 7 
sENABLE INTERRUPTS 
;LOWER PRIORITY 
sFOR EACH LOOP 
;START WITH 1 

; TURN OFF FIRST LED 
sSTALL DELAY 

;STALL DELAY 

;WAIT A WHILE 

;WAIT A WHILE 

3;SET CARRY 

;GET ANOTHER LED 
3:00 A FEW TIMES 
;RUNNING IN INTERACTIVE MODE? 
a NOT e ExIT 


;REPEAT PATTERN 
sREAD BUFFER 
sADUUST STACK 
sNO MORE 


<12><15>/TMIS IS A TEST FOR ON-BOARD LED S/<«12><15> 


/TYPE ANY CHARACTER ON A KEYBOARD TO CONTINUE /<12><15> 


SEQ 0376 


C 
c 


OKDABO KDJ11 8 
OK 


DAB.P11 


197 "6 
19777 
19778 
19779 
19780 
19781 
19°82 
19783 


116752 
116760 
116706 
116774 
117002 
117010 


os 


CLUSTER 
“APR -84 


051101 
020122 
045440 
051101 
041440 
052516 


MACY11 
16:4 


30( 1046) _05_APR 
TEST 


EVEN 


B14 
84 16:45 PAGE $78 
LED'S ON 


SEQ 0277 


Sh eng — 


COKDAR .¢ 


19784 
19785 
1978 
1973> 
19788 
19789 
19790 
19791 
19792 
19798 
19794 
19795 


11 


117016 
117020 
117026 
117030 
117034 
117036 
117044 


117046 
117054 
117060 
117064 
117074 


012737 
013704 
0127357 
01273? 
004 737 


<b 


000001 
001206 
000001 


000400 


000004 
117230 
000 340 
13.21% 


000052 


001220 


177746 


000004 
000006 


C14 


ACY11 30(1046) 05 APR-84 16:45 PAGE 379 
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ME Y MAPPING 


.SBTTL TEST - MEMORY MAPPING 

sMEMORY MAPPING 

;THIS TEST WILL AUTOSIZE MEMORY IN 2K BYTES. EVERY PAGE WILL BE 
sCHECKED FOR WHAT TYPE IT IS: Q@-8US, UNIBUS OR PMI BUS MEMORY Br 
;SEEING HOW IT CAN BE CACHED. 

sROUTINE TEST 

3. LET 4*ADDRESS OF NON-EXISTENT MEMORY 

3. IF KMCR<05-00> NE 01 THEN (NOT ALL UNIBUS MEMORY ) 


3 jaa MMU AND REMAP THE PROGRAM AREA 
3. 
S. . DOO FOR KDPARO FROM #0 [TO 0177600 
Ge ‘ reg FOR R1 FROM 80 TO 820000 BY #4000 
bs . READ (R1) 
bs ‘ . IF ABORT NON-EXISTENT MEMORY NE 1 
is ‘ » MEMORY EXISTS 
tis ‘ ° ‘ READ (R1)> 
Be ‘ P s READ (R1) 
$e ‘ . * IF —— EQ 2_HITS THEN 
h. ‘ ‘ 2 MI MEMORY 
be a . ‘ EL SE 
S< ® * P IF HMIT/MISS EQ HIT THEN 
bs ‘ . ‘ P ‘ Q-BUS MEMOR: 
be ‘ . “ ‘ ELSE 
3. ‘ P ‘ P 2 ERROR 
ee . ” ‘ ‘ ENOIF 
8. ‘ . ENDIF 
Gs é . ENDIF 
ia ‘ ‘ LET ABORT NON EXISTENT MEMOR® = 20 
8< ENODO 
t. - ENDDO 
bn UNTILL ABORT NON-EXISTANT MEMORY EQ 21 
3. ENDI+ 
8. 
sENDROUT INE 
;ROUT INE NON-EXISTENT MEMORY 
- LET ABORT NON-EXISTEN! MEMOR? <0] 
RE TURN 
SENDROUT INE 


FESSSSSSSSSSHSHSSSSSSHSSHESHSHEHHSHHSHSHHHSHESHEHHEHESHHHHSEHEHHHESEEHESHEHHEEEEE 


TST54; SCOPE 


BIT eBLTO0,aeSe sCHAIN MODE ? 
BEQ TST55 s3If SO, EXIT TEST 
TST $PASS 3sF IRST PASS? 
BNE 1ST55 s3IF APT AND NOT FIRST PASS, EXLT TEST 
CMPB nt aad ma 3APT ome 
BEQ 1915 as1ES, SIP PRINTOUT: 
3 
3 SETUP ALL REGISTERS FOR MAPPING 
3 
MOV 0300,CCR sFLUSM THE CACHE 


MOV ERRVEC ,R4 sSTORE TIMEOUT VECTOR 
MOV @7$, QOERRVEC sPOINT TO PROGRAM AREA 
MOV 9340, ERRVEC +2 sAT PRIORITY 4 

JSR PC, INI TMM sREMAP PROGRAM AREA 


SEQ 0378 


COKDABO KDILL B CLUSTER 
COKDAB.P11 (OS APR -84 


19840 
19841 
19842 
19843 
19844 
19845 
19846 
19837 
19848 
19849 
19850 
19851 


117100 
117104 
117106 
117110 
117114 
117122 


117124 
117132 
117136 
117140 
117144 
117146 
117154 
117156 
117164 
137172 
117200 
117202 
117204 
117206 
117210 
117214 
117216 
117224 
117226 


117230 
117232 
117234 
117240 
117244 
117252 
117254 
117256 
117260 
117262 
117264 
117270 
117272 
117274 
117276 
117300 
117302 
117306 
117506 


117310 
117316 
117324 
117332 
117340 


020113 
020123 
044515 
051117 
020115 


macy 3! 80( 1046) 
16:4 


172354 


177572 
000020 


000200 
140000 


003776 
001000 
177752 


001000 
000004 


154000 
177600 


000004 
177572 
000020 


117310 


117340 


054502 
043117 
046440 
005131 
054502 


172516 


172354 


177520 


110504 
177520 
110504 


172354 


172516 


042524 
050040 
046505 
000015 
042524 


D14 


183; 4PR Be mod? ARkprine *8° 


CLR KIPAR6 
CLR R2 
CLR R3 
INC MMRO 
BIS OBI TO4 ,MMRS 
BR es 
H 
3; TRY TO MAP ALL PAGES 
3 
1$: ADD 200 ,KIPAR6 
2s: MOV #140000 ,R1 
BR 4$ 
3$; ADD 93776,R1 
4$; TsT (R1)> 
BIC #1000,BCSR 
TsT (RL) 
MOV HITMIS,RECDAT 
BIS #1000, BCSR 
BIT OB ITO2,RECDAT 
BEQ 5$ 
INC Re 
BR 6$ 
S$: INC R3 
6 CMP #154000,R1 
BHI 3$ 
CMP 177600,KIPAR6 
BNE 1$ 
BR 8s 
H 
; MAPPING IS DONE, FIND OUT HOW MANY PAGES WERE 
H 
7$: TST (SP )> 
TST (SP )> 
8s; MOV R4,ERRVEC 
CLR MMRO 
BIC OB LTO4 ,MMRS 
TST R2 
BEQ 93 
ASL R2 
MOV Re, -( SP) 
TYPOS 
TYPE »MEMK 
9$: TsT R3 
BEQ 10$ 
ASL R3 
TYPDS 
TYPE »MEMQ 
10$; 
BR TST55 
MEMIC ; -ASCIZ /K BYTES OF PMI MEMORY /<12><15> 


ssEXIT TES! 


sUSED FOR MAPPING MEMORY 
sCLEAR PAGE COUNT FOR PMI 
sCLEAR PAGE COUNT FOR QBUS 
sENABLE MEMORY MANGEMENT 
sENABLE 22 BITS 

sGO ACCESS 


s INCREMENT BY 4K WORDS 
sACCESS THRU KIPAR6 

sSTART DOING IT 

s INCREMENT Br 1K WORDS 
sACCESS 1ST LOCATION 
sDISABLE HALT ON BREAK 
sACCESS 2ND LOCATION 

sSTORE REGISTER 

sENABLE HALT ON BREAK 

sLAST (R1) HIT? 

sIF NOT, QBUS MEMORY 

s INCREMENT 1K COUNT FOR PMI 
3GO CONITNUE 

; INCREMENT COUNT FOR QBUS MEM, 
3LAST IN 4K PAGE? 

3;IF NOT, BRANCH 

32M BOUNDARY? 

;IF NOT, BRANCH 

sIF 2M, DON’T TOUCH STACK 


THERE 
sADJUST STACK 


sRESTORE ERROR VECTOR 
sDISABLE MEMORY MANGEMENT 
;DISABLE 22 BITS 

sANY PMI MEMORY ? 

;IF NOT, GO CHECK QBUS MEMORY 
; TRANSLATE TO BYTES 
sSTORE 1K @ ON STACK 
sTYPE © OF PAGES 

sTYPE ASCII 

sANY Q-BUS MEMORY ? 

3IF NOT, BRANCH 
sTRANSLATE TO BrTES 
sSTORE 1K @ ON STACK 
sTYPE © OF PAGES 

sTYPE ASCII 


MEMQ; -ASCIZ 7K BYTES OF Q- BUS MEMORY %* 10*e 15> 


SEQ 0379 


COKDABO KDJLL B CLUSTER MACY11 30( 1046) 


COKDAB P11 


198% 
19897 
19898 
19899 


117346 
117354 
117362 
117370 


117372 


117374 
117400 
117406 
117414 
117416 
117422 
117426 
117430 
117432 
117434 
117436 
117440 
117442 
117446 
117452 
117454 
117460 


117466 
117472 
117500 
1175 
11751 


020123 
041055 
046505 
000015 


000004 


013701 
012737 


010137 
052737 


013701 
012737 
012737 
010402 
012703 


05-APR-84 16:45 


043117 
051525 
OS1117 


000002 
172136 


000904 
001000 


000114 
117560 
000340 


002710 


050440 
046440 
005131 


177746 


000114 
000116 


05 - APR - 
TEST 


-EVEN 


E14 
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MEMORY MAPPING 


.SBTTL WRONG PARITY ABORT TEST 


sWRONG P 


ARITY ABORT 


sTHIS TEST VERIFIES ABORT TO 114 USING PARITY OR ECC MEMORY CSR. 
;IF MORE THEN 1 CSR PRESENT, ALL OF THEM WILL BE WRITTEN AT THE 


sSAME ‘I 
; 
sROUT INE 
ie 


;ENDROUT 


ME. 


TEST 
SIZE FOR ALL POSSIBLE MEMORY CSR'S 
STORE UP TO 16 CSR STARTING FROM TEMP 
WRITE ALL WITH WRONG PARITY 
WRITE TO 0 
READ IT BACK 
IF NO ABORT TO 114 THEN 
ber ERROR IN PARITY ABORT LOGIC 


F 
RESTORE CSR'S 
INE 


FF SSSSSHASSAHSHASHAHEOSEHESSEHEESHEEESESEHESESSESSESEHESEHEEEEHEHEHHEEEEEEE 


TSTSS: 


SCOPE 


3 
; FIND OUT ALL POSSIBLE MEMORY CSR LOCATIONS UP TO 16 


MOV ERRVEC,R1 
MOV 92% ,ERRVEC 
MOV 0340, ,ERRVEC+2 
CLR R4 

MOV #172100,R2 
MOV OTEMP ,R3 
TS! (R2) 

MOV R2,(R3)> 
INC R4 

BR 3$ 

TST (SP )> 

TST (SP )+ 

ADD @2,R2 

CMP $172136,R2 
BHI 1$ 

MOV R1,ERRVEC 
BIS #BITO9,CCR 


ALL CSR'S WITH WRONG ECC CODE 


sSTORE TIMEOUT VECTOR 
sPOINT NEW TO PROGRAM 


sFIRST POSSIBLE CSR 
sSTORAGE LOCATION 

3IS CSR THERE? 

sIF THERE, STORE 

s INCREMENT COUNT FOR CSR’'S 
;BRANCH AROUND 

sRESTORE STACK 


sPOINT TO NEW CSR 
:IF NOT, BRANCH 


sRESTORE ERROR VECTOR 
3SET CACHE BYPASS 


IN PARITY MEMORY THOSE BITS ARE READ ONLY AND 
DIAGNOSTIC MODE BIT FOR ECC IS THE SAME AS WRONG PARITY 


MOV 9°114,FR1 
MOV 06$,90114 
MOV #340,80116 
MOV R4,R2 

MOV &TEMP RS 


sSTORE PARITY ABORT VECTOR 
sPOINT NEW TO PROGRAM 

sAT PRIORITY 7 

sSTORE CSR COUNT 

sSTART WITH 1ST CsR 


SEQ 0380 


COKDABO KNJLL B CLUSTER MACY11 30( 1046) 


COKDAB .P 11 


117514 


O05 - APR - 84 


052773 
042733 
077406 
005037 
010204 
012703 
042733 
077203 
005737 
104034 
000402 
005726 
005726 
012703 
042733 
077403 
032737 
001004 
012737 
104035 
042737 
005037 
005037 
010137 


F14 
PAGE 382 


0O5-APR-84 16:45 
16:45 WRONG PARITY ABORT TEST 
000005 000000 4%: BIS #BITO2]!BITOO,a0(R3) 
003740 BIC #3740,a(R3)>+ 
SOB R4,4$ 
000000 CLR ae0 
MOV R2,R4 
002710 MOV @TEMP ,R3 
000004 S$: BIC oBITO2, @C(R3)>+ 
SOB R2,5$ 
000000 TST ao 
ERROR +34 
BR 7$ 
6$: nov (SP )> 
TST (SP)> 
002710 7$: MOV @TEMP ,R3 
000001 8$: BIC eBITOO, aC R3)>+ 
S0B R483 
100000 177744 ne aeiTis, MSER 
100000 001124 MOV #100000, $GDDAT 
ERROR +35 
001000 177746 9$: BIC #BI1T09,CCR 
CLR a#0 
177744 CLR MSER 
000114 MOV R1,80114 


sDIAGNOSTIC OR WRONG PARITY 

sCLEAR <10-S> CHECK BITS 

300 FOR ALL CSR’S 

;CLEAR TEST LOCATION WITH WRONG PR 
sRESTORE COUNTE 

sSTART WITH IST RcsR 

sCLEAR ALL WRONG PARITr 

sIN ALL CSR’‘S 

sREAD BACK WRONG PARITY 

3NO WRONG PARITY ABORT 


sADJUST STACK 


sSTART WITH 1ST CSR 
;CLEAR ALL WRONG PARITY 
3IN ALL CSR’S 

sABORT REFLECTED IN MSER? 
;IF YES, BRANCH 


3 

sMSER<15> NOT SET ON PARITY ABORT 
sCLEAR CACHE BYPASS 

sCLEAR WRONG PARITY 

3;CLEAR MSER 

sRESTORE PARITY ABORT 


SEQ 0381 


COKDABO KDJ11-B CLUSTER MACY11 30( 1046) 


COKDAB.P11 


19978 
19979 
19980 
19981 
19982 
19983 


117640 


117642 
117646 
117650 
117654 
117656 
117662 


117670 
117676 
117704 
117710 
117714 
117722 


117730 
117730 
117734 
117736 
117740 
117744 
117752 


000004 


012702 
005722 
022702 
001374 
005737 
013737 


052737 
052737 
005037 
013705 
042737 
042737 


022705 
001401 
104117 
005037 
012737 
013737 


OS -APR-84 16:45 


117670 
117730 


002710 
177520 


000400 
002001 
002710 
177744 
002000 
000400 


060020 


177744 
000400 
002710 


002710 


177520 
177746 


177746 
177520 


177746 
177520 


G14 
O5-APR-84 16:45 PAGE 383 
EST - DMA TAG PARITY IN STANDALONE MODE 


-SBTTL TEST - DMA TAG PARITY IN STANDALONE MODF 
sCHECK DMA TAG STORE PARITY BIT. 
sROUTINE TEST 


Ss CACHE DMA_PARITY 

He LET BCSR<08>=#1 

r REPORT ALL ERRORS 

3; ENDROUT INE 

3 

sROUTINE OMA_PARITY 

3. GENERATE PARITY ERRORS 
Be CHECK MSER<13> 

Se LET BCSR<08>=8#0 

s ENDROUT INE 


FE PSHSARSAEHASSEAHAHAEESEASEAHEEEHEEEHEEOHEHESESEEEEEEEEEEHEEEHEESEHEEAEEEEE 


TSTS6: SCOPE 


; 
; ALLOCATE CODE IN CACHE 
3 


MOV @DMAPAR ,R2 sPOINT TO STANDALONE CODE 
1$: TST C(R2)+ sALLOCATE IN CACHE 
CMP @DPAREN,R2 sLAST ADDRESS? 
BNE 1$ sIF NOT, BRANCH 
TST TEMP sALLOCATE TEST LOCATION 
MOV BCSR,SAVBR ;SAVE BCSR 
é 
; IN STANDALONE MODE TRY TO VERIFY RESPONSE TO PARITY ERRORS 
é 
DMAPAR: BIS #BITO8,BCSR 3SET STANDALONE MODE BIT 
BIS @BIT1LO!BITOO,CCR sWRITE WRONG TAG PARITY 
CLR TEMP sWRITE HIT WITH WRONG PARITY 
MOV MSER RS sSTORE MSER 
BIC #BIT10,CCR sCLEAR WRONG PARITY BIT 
2s: BIC “BITO8,BCSR sCLEAR STANDALONE BIT 
; 
; RETURN FROM STANDALONE MODE 
é 
DPAREN: 
CMP #60020,R5 sWRONG DMA PARITY? 
BEQ 4$ :IF OK, BRANCH 
ERROR +117 sMSER NOT SET IN STANDALONE MODE 
4$: CLR MSER 
MOV #400,CCR sFLUSH THE CACHE 
MOV SAVBR,BCSR sRESTORE BCSR 


. 


SEQ 0382 


COKDABO KDI11 BC 
05 


COKDAB.P11 


012703 
005723 
022703 
001374 


013737 


013737 


000200 


133514 
002644 


132752 


177744 
177744 


000020 


177744 
000400 
001160 


LUSTER MACY11 50(1046) 05-APR-84 PAGE 384 
APR 84 16:45 Test DMA TAG PARITY W/O STANDALONE MODE 


000052 


001160 
000114 
177746 


177746 
177746 


177746 
000114 


H14 


16;45 


FF FFSAAAASHAAHEESEHAHEASEEEEAEEEHSEEAEEEEASEEEEESEEESEEEEEEEHEDEEEE 


sUFD MODE? 

:IF NOT, BRANCH 
sOTHERWISE, NEXT PASS 

sAT LEAST ONE Q22BE © OUND? 


33IF NOT, EXIT TEST 


sSTART WITH CURRENT INSTRUCTION 
sREAD A WORD 

sALL DONE? 

sIF NOT, CONTINUE 


;STORE PARITY VECTOR 

sPOINT TO TEST AREA 

sWRITE WRONG TAG PARITY 

sWRITE MISS WITH WRONG TAG PARITY 
;CLEAR WRONG TAG PARITY 

sPARITY ABORT 

sFLAG TO DO 1 TRANSFER 

3:00 DMA WRITE TO TEMP THRU Q2oB6E 
3sNO PARITY ABORT 

;BRANCH TO TEST MSER 

sSTORE REGISTER 

;CLEAR MSER 


; 
sRESTORE STACK 


sMSER OK? 

;IF SET, BRANCH 
sMSER<4> NOT SET 
;CLEAR MSER 
sFLUSH CACHE 


.SBTTL TEST - DMA TAG PARITY W/O STANDALONE MODE 
;CHECK DMA TAG PARITY BIT WITHOUT GOING INTO STANDALONE MODE. 
3 
;CCR <10> WRITE WRONG TAG PARITY 
3 
sROUTINE TEST 
is LET CCR<10>=41 
Be ALLOCATE LOCATION IN CACHE 
3. INITIATE DMA WRITE TRANSFERS 
LL IF MSER<04> NE #1 THEN 
ie . ERROR 
Tt ENOIF 
3; ENDROUT INE 
TSTS7: SCOPE 
BIT BITO7,ae52 
BEG 110$ 
JMP sEOP 
110$; TST CSR1 
BEQ TST60 
3 
; ALLOCATE TEST IN CACHE 
11$: MOV #.,R3 
10$: Tst (R3)>+ 
CMP 04$,R3 
BNE 10$ 
3 
; WRITE A WORD WITH WRONG PARITY 
3 
1$: MOV 9114, $TMPO 
MOV #2$,80114 
BIS #BIT10,CCR 
CLR TEMP 
BIC #BIT10,CCR 
BIS #BITO7,CCR 
CLR RO 
JSR PC ,OMATRN 
ERROR +116 
BR 4$ 
es: MOV MSER,R4 
CLR MSER 
TST (SP )>+ 
TST (SP )>+ 
TST (SP )> 
3$: BIT #BITO4,R4G 
BNE 4$ 
ERROR +116 
4$ CLR MSER 
MOV #400,CCR 
MOV $TMPO,20114 


sRESTORE VECTOR 


SEQ 0383 


COKDABO KDJ11-6 we MACY11 30( 1046) resi - APR - 84 


COKDAB .P 11 


120142 
120144 
120152 
120154 
120160 
120164 
120166 


120172 


120274 
120276 


05 - APR 


-84 16:45 


000200 


133514 
002644 


133514 


012525 


000340 


000052 


177520 
110504 


177520 
110504 


002710 


114 


16:45 PAGE 3. 


85 
- OMA WRITE HIT CYCLES 
-SBTTL TEST 


- DMA WRITE HIT CYCLES 


;CHECK THAT DMA WRITE HITS INVALIDATE CACHE. 
sROUTINE TEST 


ALLOCATE A LOCATION IN CACHE 
INITIATE OMA WRITE TO THIS LOCATION 
READ THIS LOCATION BACK 

IF IT IS CHANGED OR HIT/MISS EQ HIT 
° ERROR 

ENDIF 


WRITE TO THE FIRST 16 LOCATION THEIR ADDRESS 
DO BLOCK MODE TRANSFER TO THOSE LOCATIONS 
START READ WITH THE LAST LOCATION 
IF RECORD ANY HITS THEN 
ERROR 
NDIF 


E 

INITIATE READ OMA TO THE SAME TEST LOCATIONS 
READ THEM BACK 

IF HIT/MISS NE HIT THEN 

° ERROR 


sUFD MODE? 

;IF NOT, BRANCH 
sOTHERWISE, NEXT PASS 
sAT LEAST 1 Q22BE? 
sIF YES, BRANCH 
sOTHERWISE, NEXT PASS 


sSTART WITH 7 

3GO DO IT 

;LOWER PRIORITY 
sCLEAR TEST LOCATION 
300 JUST 1 WORD 
;LOWER PRIORITY 

3:00 DATO 

;DISABLE HALT ON BREAK 
sSTILL CACHED? 

sSTORE HIT/MISS 
sENABLE HALT ON BREAK 
3LAST ACCESS HIT? 

;IF MISS, BRANCH 


sDATO OK? 

: IF 7s BRANCH 
;DATO 

sLAST PRIORIT? QO? 
3IF NOT, BRANCH 


ENDIF 
ENDROUT INE 
b EAPAAAMOAAAEAOEREHESEREEEEEAEREEEEEERAAEREEEEEEEEEEEEEEESEEEOOEES 
TST60: SCOPE 
BIT #BITO7 ,aes2 
BEQ 1$ 
JMP sEOP 
1$: TST CSR1 
BNE 2s 
JMP sEOP 
3 
; TRY TO DO OMA WRITE AT ALL DIFFERENT PRIORITIES 
5 
2s: MOV #340 ,R2 
BR 4$ 
3$: SUB #40 ,R2 
4$: CLR TEMP 
CLR RO 
MTPS Ro 
JSR PC ,OMATRN 
BIC #1000,BCSR 
TST TEMP 
MOV HITMIS,RECDAT 
BIS #1000,8CSR 
BIT #BITO2),RECDAT 
BEQ 5$ 
ERROR +120 
5$: cmp #12525, TEMP 
BEQ 6$ 
ERROR +123 
6$: TST R2 
BNE 3$ 
MTPS #340 


é 
; VERIFY THAT DMA WITH FORCE MISS DOES 


sRESTORE PRIORI": 


NOT INVALIDATE CACHE 


SEQ 0384 


COKDABO KDJ11-B CLUSTER MACY11 
COKDAB.P11 


120372 


120374 


005037 


012737 
004737 
005037 
042737 
005737 
013737 
052737 
032737 
001401 
104123 


012701 


077126 


0S5-APR-84 16:45 


000010 
002710 


002710 
177770 
001701 
132752 
010000 


000004 
002710 
001000 


177752 
001000 
000004 


012525 


000002 


J14 


30( 1046) B+ aaeae ~ 16:45 PAGE 386 


177746 


177520 
110504 


177520 
110504 


177746 


177520 


110504 
177520 
110504 


062152 
062146 
062132 


062122 


177520 


110504 
177520 
110504 


OMA WRITE HIT CYCLES 


VERIFY THAT BYPASS WITH DMA DATI INVALIDATES CACHE 


CLR TEMP 
MOV #BIT2,CCR 
JSR PC ,OMATRN 
CLR CCR 
BIC #1000,8CSR 
TsT TEMP 
MOV HITMIS,RECDAT 
BIS #1000,BCSR 
BIT #BITO2],RECDAT 
BNE 7$ 
ERROR +123 
7$: TsT TEMP 
BEQ 8$ 
- ERROR +123 
3 
3 
3 
8$: MOV #BITO9,CCR 
JSR PC ,OMATRN 
CLR CCR 
BIC #1000,BCSR 
TST TEMP 
MOV HITMIS,RECDAT 
BIS #1000,B8CSR 
BIT #BITG2,RECDAT 
BEQ DATBO 
ERROR +123 
3 
; DO DATBO 
3 
DATBO: MOV #10,R1 
MOV @TEMP ,R2 
1$: CLR (R2)> 
INC RO 
MOV @TEMP ,aBA 
MOV #177770,awc 
MOV #1701,@CSR1 
JSR PC .OMATRN 
BIT #B1T12,aCSR2 
BEG 2s 
ERROR +123 
es: MOV #4,R1 
MOV @TEMP ,R2 
3$; BIC #1000,BCSR 
TST (R2) 
MOV HITMIS,RECDAT 
BIS #1000,BCSR 
BIT #BITO2,RECDAT 
BEQ 4s 
ERROR +121 
4$: CMP #12525,(R2)+ 
BEQ 5$ 
ERROR +123 
S$: ADD #2,R2 
SOB R1,3$ 


sALLOCATE CACHE 

3SET FORCE MISS 

300 DMA DATI 

sCLEAR FORCE MISS 
sDISABLE HALT ON BREA 
sSTILL IN CACHE 

3STORE REGISTER 
sENABLE HALT ON BREA 


sHIT? 
;IF SO, BRANCH 


sREAD FROM CACHE ? 
sIF STILL O, BRANCH 


3SET BYPASS 

300 OMA DATI 

;CLEAR BYPASS 

sDISABLE HALT ON BREAK 
3IN CACHE? 

;STORE REGISTER 
sENABLE HALT ON BREAK 
3; TEMP WAS A HIT? 

;IF NOT, BRANCH 


sCOUNTER FOR 8 

START WITH TEMP 
sCLEAR ALL 16 

3:00 ALL 16 

sFLAG BLOCK MODE 

;LOAD DMA ADDRESS 

3:00 8 WORDS 

316 WORDS FROM 32k 

300 DATBO 

3NO BLOCK MODE SLAVE? 
;IF NOT, BRANCH 

sNO BLOCK MODE SLAVE 
;COUNTER FOR 4 LOCATIONS 
3;START WITH TEMP 
;DISABLE HALT ON BREAK 
sACCESS A LOCATION 
;STORE REGISTER 
sENABLE HALT ON BREAK 
sHIT? 

;IF NOT, BRANCH 

s0MA DOES NOT INVALIDATE 
:DATO OK? 

;IF SO,BRANCH 

IN DMA 


:00 IN 2 WORDS 
300 ALL 16 


SEQ 0785 


COKDABO KDJ11-B 
COKDAB.P11 


20187 
20188 
20189 
20190 
20191 
20192 
20193 
20194 
20195 
20196 
20197 
20198 
20199 


121072 


CLUSTER MACYLL 
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077126 


005037 
012706 
012737 
012737 
005000 


004737 
022777 
001401 
104123 


012701 
012702 
012703 
010322 
005723 
077103 
005200 
004737 


16:45 


177752 
001000 
000004 


012525 


000002 


177572 
001100 
133124 
052525 


133034 
052525 


000010 
002710 
002710 


133034 


30( 1046) 


172354 
172314 
177572 
000004 


061752 
061746 
061732 


177520 
110504 


177520 
110504 


000004 
002710 


061612 


OS - APR -84 
TEST 


K14 


16:45 PAGE 387 


- DMA WRITE HIT CYCLES 


é 
; DO 4K OF DATO AND CHECK FOR MISS 


JSR PC, INI TMM 
MOV #2000 , KIPAR6 
BIC #B1T15,KIPDR6 
BIS @BI TOO ,MMRO 
MOV @DATI,a04 
MOV #140000 ,R2 
TST (R2) 
MOV #10000 ,R1 
6$: CLR (R2)+ 
SsoB R1,6$ 
INC RO 
MOV 00 ,aBA 
MOV #- 10000, awC 
MOV #3701, acsR1 
JSR PC, DMATRN 
76% MOV @4000,R1 
MOV #140000 ,R2 
8$: BIC #1000,BCSR 
TST (R2) 
MOV HITMIS,RECDAT 
BIS #1000,BCSR 
BIT #BITO2,RECDAT 
BEQ 9$ 
ERROR +121 
9$: CMP #12525, (R2)+ 
BEQ 10$ 
ERROR +123 
10$: ADD #2,Re 
S08 R1,8$ 
6 
; CHECK DATI 
. 
DATI: CLR MMRO 
MOV #1100,SP 
MOV #TOUT ,a04 
MOV #52525, TEMP 
CLR RO 
JSR PC ,OMARD 
CMP #52525, @DATA 
BEQ 11$ 
ERROR +123 
é 
; DO DATBI 
4 
11$: MOV #10,R1 
MOV @TEMP ,R2 
MOV #TEMP ,R3 
12s: MOV R3,CR2)> 
TST. (R3)+ 
soB R1,12$ 
INC RO 
JSR PC ,DMARD 


3SET UP MMU 

3START AT 32K 

3;NO BYPASS 

sENABLE MMU 

3IF 32K NXW 

sSTART WITH 32k 

3;EXIT 

sCOUNTER FOR 4K 

sCLEAR ALL 16 

300 ALL 16 

sFLAG BLOCK MODE 

3LOAD OMA ADDRESS 

300 4K 

316 WORDS FROM 32K 

300 DATBO 

sCOUNTER FOR 4K LOCATIONS 
;START WITH O 

;DISABLE HALT ON BREAK 
;ACCESS A LOCATION 
;STORE REGISTER 
sENABLE HALT ON BREAK 
sHIT? 

;IF NOT, BRANCH 

;DMA DOES NOT INVALIDATE 
sDATO OK? 

;1F SO,BRANCH 

3IN OMA 

300 IN 2 WORDS 

:D0 AL. OF THEM 


sOISABLE MMU 
sRESTORE STACK 
sAND TIMEOUT 


sDATI OK? 
3IF YES, BRANCH 
;DATI 


;COUNTER FOR 16 LOCATIONS 
sSTART WITH TEMP 

sSTART WITH TEMP 

sPUT ADDRESSES 

: INCREMENT ADDRESS 

300 ALL 16 

3FLAG BLOCK MODE 

300 DATBI 


COKDABO KDJ11-B CLUSTER MACY11 30( 1046) £+ APR - 84 16:45 PAGE 388 

COKDAB P11 OS-APR-84 16:45 TES OMA WRITE HIT CYCLES SEQ 0387 
20243 121076 032777 010000 061542 BIT #B1T12,@CSR2 sNO BLOCK MODE SLAVE? 
20244 121104 001401 BEQ 13$ IF NO, BRANCH 

20245 121106 104123 ERROR +123 

20246 121110 022777 002726 061536 153%: CMP #TEMP+16,@DATA sDATI OK? 

20247 121116 001401 BEQ 14$ sIF SO, BRANCH 

20248 121120 104123 ERROR +123 sIN DATIB 

20249 121122 042737 001000 177520 14%: BIC #1000,BCSR sOISABLE HALT ON BREAK 
20250 121130 005737 002710 TST TEMP sACCESS 

20251 121134 013737 177752 110504 MOV HITMIS ,RECDAT sSTORE REGISTER 

20252 121142 052737 001000 177520 BIS #1000,BCSR sENABLE HALT ON BREAK 
20253 121150 032737 000004 110504 BIT #BITO2,RECDAT sHIT? 

20254 121156 001001 BNE 15$ sIF YES, BRANCH 

20255 121160 104123 ERROR +123 

20256 121162 15$; 


COKDABO KDJ11-8 


COKD 


AB.P1iL 


121162 
121164 
121172 
121174 
121200 


121202 
121206 
121214 
121222 
121226 
121232 
121234 


121240 
121246 
121250 
121256 
121262 
121266 
121272 
121274 


M14 
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000004 
032737 
001122 
005737 
001517 


013703 


162701 


012737 


OS -APR-84 16:45 


000052 


061442 
061436 


001160 
001160 


16: AGE 389 
EST - DIFFERENT LEVELS OF INTERRUPTS 


-SBTTL TEST - DIFFERENT LEVELS OF INTERRUPTS 

s;DIFFERENT LEVELS OF INTERRUPTS 

sTHIS TEST WILL PROGRAM Q22 BUS EXERCISER TO INTERRUPT AT DIFFERENT 
sLEVELS. ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS AND 
sPIRQ’S WILL BE TESTED. 


‘ 

s;CHECK DIFFERENT LEVELS OF INTERRUPTS. 
sROUTINE TEST 

3. SET VECTOR TO INTERRUPT _DMA 


re FOR INTERRUPTS FROM 4 TO 7 DO 

es ENABLE INTERRUPTS 

. " SET PRIORITY=INTERUPT 

i. . IF INTERRUPT_FLAG SET THEN 
8. ‘ ERROR 

ie 4 ENDIF 

as “ ENABLE INTERRUPTS 

bs i SET PRIORITY=INTERRUPT-1 
i. . IF INTERRUPT_FLAG NOTSET THEN 
is _ 2 ERROR 

3 ENDIF 

Bw LET INTERRUPT_DMA=-0 

3. ENDDO 

sENDROUTINE 

S ROUTINE INTERUPT_DMA 

8. LET INTERRUPT_FLAG=1 

;RETURN 

3s ENDROUTINE 


FS AASAAAAAAAREAASAAEREEEEDAEAEAEEEEEREREEEAEAERAEEEAASCAEEEEADAEADE 


TST61: SCOPE 


BIT #BITO7,a#S2 sUFD MODE? 
BNE TST62 siIF SO, EXIT TEST 
TST CSR1 sAT LEAST ONE Q22BE FOUND? 
BEQ TST62 33IF NOT, EXIT TEST 

‘ 

; SETUP INITIAL PRIORITY TO 7 

3 
MOV CSR1,R3 ;00 FOR FIRST FOUND Q22BE 
MOV #S$,@VQBE1 sPOINT INTERRUPT VECTOR TO PROGRAM 
MOV #340, aVQPR1 sAT PRIORITY 7 
MOV #Q22EN,RO sSTART WITH 7 FOR INTERRUPTS 
MOV #340,R1 ;LOW BOUNDARY FOR NO INTERRUPTS 
BR 2s sTRY TO OO IT FOR FIRST 

1$; SUB #40,R1 ;LOWER LOW BOUNDARY 

3 

3; CHECK THAT INTERRUPTS DON'T HAPPEN AT PRIORITY HIGHER THAN BR 

2s: MOV #340, $TMPO ;TOP PRIORITY FOR NO INTERRUPTS 
BR 4s 300 FIRST ONE 

3$: SUB #40, $TMPO :00 AT NEXT LEVEL 

4$: MTPS $TMPO sSET PRIORITY NOT TO INTERRUPT 


JSR PC ,Q22INT sENABLE INTERRUPTS 
— (RO)+,@CSR2 ;CLEAR GO BIT 


SEQ 0388 


COKDABO KDJ11-B CLUSTER 


COKDAB .P11 


121276 


121316 
121322 


121324 
121332 
121340 


05 - APR - 84 


000240 
000403 
104126 
005726 
005726 
020137 
001355 
022710 
001344 


012777 
012777 


MACY11 30( 1046) ast ° aa 
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001160 


121420 
000340 
002752 
000300 


001160 


061324 
061320 


001160 


N14 


;IF NO INTERUPT, BRANCH 
s INTERRUPTS HAPPEN 
sRESTORE STACK 


sLAST ONE? 

3IF NOT BRANCH 

sAT BR4? 

;IF NOT LAST ONE, BRANCH 


sPOINT INTERRUPT VECTOR TO PROGRAM 
sAT PRIORITY 7 

sSTART WITH 7 FOR INTERRUPTS 

;TOP BOUNDARY FOR INTERRUPTS 

;TRY TO DO IT FOR FIRST 

;LOWER TOP BOUNDARY 


sPRIORIT: FOR INTERRUPTS 
300 FIRST ONE 

300 AT NEXT LEVEL 

;SET PRIORITY NOT TO INTERRUPT 
sENABLE INTERRUPTS 

:CLEAR GO BIT 

;WAIT A WHILE 


s INTERRUPTS DON’T HAPPEN 
;D0N‘'T RESTORE STACK 
sRESTORE STACK 


sLAST ONE 0? 
3;IF NOT SRANCH 
;AT BR4&? 


16:45 PAGE 390 
EST - DIFFERENT LEVELS OF INTERRUPTS 
NOP 
BR 6$ 
S$: ERROR +126 
TST (SP )+ 
TST (SP )+ 
6$: CMP R1,$TMPO 
BNE 3$ 
CMP #2,CRO) 
BNE 1$ 
3 
; INTERRUPT AT ALL LEVELS 
a 
INQ@22: MOV #S$,@VQBE1 
MOV #340, @VQPR1 
MOV #Q22EN,RO 
MOV #300,R1 
BR es 
1$: SUB #40,R1 
3 
; CHECK THAT INTERRUPTS HAPPEN AT PRIORITY LOWER THAN BR 
; 
2s; MOV R1,$TMPO 
BR 4s 
3$: SUB #40, $TMPO 
4$: MTPS $TMPO 
JSR PC ,Q22INT 
MOV CRO), aCSR2 
NOP 
NOP 
NOP 
ERROR +126 
BR 6$ 
S$: TST (SP )+ 
TsT (SP )+ 
6$: TST $TMPO 
BNE 3$ 
CMP #2,(RO)> 
BNE 


;IF NOT LAST ONE, BRANCH 


SEQ 0389 
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121440 
121442 
121450 
121452 
121456 
121460 
121466 
121474 
121502 
121510 
121514 
121520 
121524 
121530 
121532 
121536 


121606 
121610 


121614 
121622 
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000140 
177772 
040000 


000052 


061170 
061164 
000240 
000242 


020000 


5 | { 

) . 
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TEST ARBITRATION BETWEEN PIRQ’'S AND INTERRUPTS 


.SBTTL TEST - ARBITRATION BETWEEN PIRQ’S AND INTERRUPTS 
:CHECK PRIORITY ORDER BETWEEN PIRQ’S AND INTERRUPTS, 
sROUTINE TEST 


i. IF UFO THEN 

e. . EXIT TEST 

Ss ENDIF 

es DO FOR I FROM 06 DOWN TO @3 

ts , SET PRIORITY TO I 

be r ENABLE INTERRUPT(I+1) AND PIRQC(C1I+1) 
3. ‘ IF INTERRUPT(I+1) WAS BEFORE PIRQ(I+1) THEN 
8s ° . ERROR 

$e ‘ ENDIF 

ts ENDODO 

3s ENDROUT INE 


BESSSHSHSSASSHHHEHSHEEHHEHHEHEASEESEEEHEESHAEHSSEEESEHESEHEHESEEEEESEEEEEEOS 


TST62: SCOPE 


BIT oB1TO7,a052 sUFD MODE ? 
BNE TST63 ssIF SO, EXIT TEST 
TST CSR1 sAT LEAST ONE Q22BE © OUND? 
BEQ TST63 ssIf NOT, EXIT TEST 
MOV ©3$,@VQBE1 sSETUP Q22BE VECTOR 
MOV 0340, aVQPR1 3AT PRIORITY 7 
MOV 04% ,PIRQVEC ;SETUP PIRQ VECTOR 
MOV #340 ,PIRQVEC +2 sAT PRIORITY 7 
MOV @Q22EN,RO sPOINT THRU PRIORITIES FOR Q22BE 
MOV OPIRQT,R4 sPOINTER THRU PIRQ'S 
MOV CSR1,R3 300 FOR FIRST Q22BE 
MOV 2300 ,R2 sSTART WITH CPU PRIORITY AT 7 
BR es 300 FIRST ONE 
1$; SUB 040 ,R2 sLOWER CPU PRIORITY 
2s: MTPS @340 sRAISE PRIORITY TO 7 
MOV (R4)+,PIRG ;SET PRIORITY FOR PIRQ'S 
JSR PC ,Q22INT sINITIALISE Q22BE TO INTERRUPT 
MOV CRO)+, aCSR2 sSET DONE BIT 
MTPS Re ;LOWER PRIORITY 
NOP 
NOP 
NOP 
3$: ERROR °124 sPIRQ’'S DON’T TAKE OVER BIRQ’S 
TST (SP )- sCLEAN UP STACK 
TST (SP)- 
BR 5$ ;BRANCH AROUNCO PIRQ INTERRUPT 
43: TST (SP )+ sCLEAN UP STACK 
TST (SP )- 
S$: CMP @140,Re2 sPRIORITyY 3 LAST ONE? 
BNE 1$ 3IfF NOT BRANCH 
CLR PIRQ sCLEAR ANY REQUESTS 
PIRQT: .WORD 100000 ,40000 , 20000, 10000 sPIRQ’S<« 74> 


5EQ 90499 


COKRDABO KNOLL B&B CLUSTER MACIL11 8001046) 


COKDAB LP 11 


20806 
20a0? 
20408 
2£0da0o9 


121624 


121716 
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005726 
013737 


000200 
002644 
000024 
121706 
000340 
000040 


060744 


060734 


001160 


. SBT TL 


mee 
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TEST 


- POWER DOWN TEST 
TEST - POWER DOWN TEST 


iUSING ‘th oye THIS TEST WILL CHECK THAT ON POWER ey CONDITION IF 


sPOWER 


ODE 00 IS SELECTED THE CPU TRAPS THRU 2 


sROUTINE TEST 


IF UFD OR POWER UP CODE O00 NOT SELECTED THEN 
° ExIT TEST 

ENDIF 

SET 24 TO POINT TO TEST AREA 

LET CSR2<S> = #1 TO NEGATE BPOK 

IF NO TRAP TO 24 THEN 

. ERROR IN POWER DOWN CYCLE 

ENOIF 


IF TRAP TO 24 THEN 
LET CSRe<5> = 00 


ENDIF 
ENDROUT INE 
J OPOOOOREREO ROE EEEEREROEEEEEEEEEEEREOEEOCEEEDEEEEEEEESEOEEEEEOEE 
TST63: SCOPE 
000052 BIT sia ;UFD MODE ? 
BNE TST6 ssExIT TEST IN UFD MODE 
TST Cert sAT LEAST ONE QG22BE FOUND? 
BEQ TST64 s3IF NOT, EXIT TEST 
001160 MOV PWRVEC , $TMPO sSAVE POWER UP VECTOR 
000024 MOV 1% ,PWRVEC sPOINT NEW TO PROGRAM 
000026 MOV 0340 ,PWRVEC +2 sAT PRIORITY 7 
060752 a eB ITOS,acsRe 300 POWER DOWN 
CLR acsRo sCLEAR POWER DOWN BIT 
ERROR +125 3sNO POWER DOWN TRAP 
8R es 3SKIP RESTORING STACK 
1$: CLR acsRe sCLEAR POWER DOWN BIT 
TST (SP )> sRESTORE STACK POINTER 
TsT (SP )- 
000024 23: MOV $TMPO,PWRVEC sRESTORE POWER VECTOR 


SEQ 02%1 
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COKDABR P11 


20444 


121724 
121726 
121734 
121736 
121742 
121744 


121750 
121756 
121764 
121772 
122000 
122004 
122010 


122012 
122016 
122022 
122026 
122032 
122036 


122076 
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012777 
012777 
012777 
012777 
012700 
012702 
000402 


162702 


000200 
002664 
133514 


132732 
060612 


000052 


060700 
060674 
060704 
069700 


DIS 
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TEST - ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS 


.SBTTL TEST 


- ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS 


;IF TWO Q22BE ARE AVAILABLE, THIS TEST Wiit CHECK THAT HIGHER i EVEL 


s INTERRUPT REQUESTS TAKE PRIORITY OVER LOWER LEVEI ONES 


sROUTINE TEST 


IF UFD OR 2ND Q22BE NOT AVAILABLE THEN 


. EXIT TEST 
ENDIF 


DO FOR PRIORITY_LEVELS FROM 4 TO 6 


. SET UP 1ST Q220E TO INTERRUPT AT PRIORITY LEVEL 


. SET UP 2ND Q22BE 

. SET UP CPU PRIORITY TO PRIORITY LEVEL -1 

. IF oan FORM 1ST Q22BE HAPPENED BEFORE 157 THEN 
E 


: ENDIF 
&NDDO 


;ENDROUT INE 


TO INTERRUPT AT PRIORITY LEVEL +1 


FESPSSHSAHEHASHSEHASHEEHEESEHASEASOHESEHSESEAES* SESSEHEHHESEEEEEEEEEEES 


TST64: SCOPE 


BIT oBIT07,aeS2 
BNE TST65 

TST CSR12 

BNE 1$ 

JMP se€oP 


INITIALISE VECTORS FOR Q22BE'S 


$: MOV 04% ,aVQBE1 

MOV 9340, 8VQPR1 
MOV 05% ,avQBE2] 
MOV #340, 8VQPRe 
MOV @Q22EN+2,RO0 
MOV 0240 ,R2 
BR 3% 

; 

; DO FOR CPU PRIORITIES 5-3 

3 

2s: SUB 040 ,R2 

3%: MTPS @340 
MOV CSR12,R3 
JSR PC,Q22INT 
MOV (RO), aCSR2 
MOV CSR1,R3 
TST -C(RO) 
JSR PC ,Q22INT 
MOV (RO)+, @CSR22 
MTPS R2 
NOP 
NOP 
NOP 

43; ERROR +126 
TST CSP )e 
TST (SP )e 
BR 6$ 

58: TST (SP )e 


;UFD MODE? 
s3IF SO, EXIT TEST 


sSECOND Q22BE AVAILABLE? 
3IF vES, GO DO TES’ 
sOTHERWISE, GOTO EOP 


sVECTOR FOR 1ST ONE 

sAT PRIORITY 7 

sVECTOR FOR 2NO ONE 

sAT PRIORITY 7 

sPOINTER FOR Q22BE BR'S 
sCPu AT 5 

;START DOING ARBITRATION 


;LOWER CPU PRIORITY 
;CPU AT 7 

3;Q22BE 2 AT HIGHER BR 
sINITIALISE TO INTERRUPTS 
sSTART 1ST ONE 

3Q22BE 1 AT LOWER BR 
sMIGHER PRIORITY 

s INITIALISE 

;START 2ND ONE 

sLOWER CPU PRIORITY 
sWAIT A WHILE 


s INTERRUPTS IN WRONG ORDER 
sRESTORE STACK 


sRESTORE STACK 


SEQ 9392 


ELS 


COKDABO KDJ11-B CLUSTER MACY11 30( 1046) — 16:45 PAGE 394 
4. 


COKDAB.P 11 05 -APR-84 16:45 ES! - ARBITRATION BETWEEN DIFFERENT LEVELS OF INTERRUPTS SEG 0393 
20500 122100 022702 000140 6$: CMP #140 ,R2 sPRIORITY 3 LAST? 
20501 122104 001342 BNE es ;IF NOT, BRANCH TO CONTIN: 


20502 


Fis 


COKDABO KDJ11 8B CLUSTER MACY11 30(1046) 05-APR- “06 16:45 PAGE 395 


COKDAB.P 11 05 -APR-84 16:45 TEST PMG COUNTER SEQ 0394 
20503 -SBTTL TEST - PMG COUNTER 

20504 sUSING 2 Q22BE THIS TEST WILL VALIDATE THAT PMG COUNTER IS REALLY 

20505 sCAPABLE OF GRANTING CPU BUS MASTERSHIP WHEN DMA REQUESTS ARE STILL 

20506 sPENDING. 

20507 sROUTINE TEST 

20508 3. IF UFD OR NO 2ND Q22BE THEN 


EXIT TEST 


% 
g 


ENDIF 


3. 

20511 . SET PMG COUNT TO SOME VALUE 

20512 3. PROGRAM BOTH Q22BE TO INTERRUPT AT THE SAME LEVEL 

20513 Be DETERMINE WHICH HAS HIGHER PRIORITY ON THE BUS 

20514 a. PROGRAM Q22BE WITH HIGHER PRIORITY TO DO HOG MODE 

20515 . PROGRAM 2ND ONE TO DO A CYCLE 

20516 gs CACHE INSTRUCTION THAT WILL STOP 2ND DMA 

20517 8. INITIATE BOTH DMA CYCLES 

20518 Os STOP 2ND DMA (RESET IS “STOLEN” CPU BUS CYCLE) 

20519 a» IF 2ND OMA HAPPENED THEN 

20520 a. ° ERROR 

20521 Ae ENDIF 

20522 8. CLEAR PMG COUNT 

20523 8. PROGRAM Q22BE WITH HIGHER PRIORITY TO DO HOG MODE 

20524 Ss PROGRAM 2ND ONE TO DO A CYCLE 

20525 cs CACHE INSTRUCTION THAT WILL STOP 2ND DMA 

20526 a. INITIATE BOTH OMA CYCLES 

20527 as STOP 2ND DMA (CLEARING OF CSR2<0> IS “STOLEN” CPU BUS CYCLE) 

20528 a. IF 2ND OMA DION’ T HAPPENED THEN 

20529 Bs ° ERROR 

20530 s. ENDIF 

20531 3; ENDROUT INE 

20532 

20533 FE POOAAMAHAEHEEEEEESEEEAEEEHASDEAEEERESEAEEEEEEEEEESEEEREEDOE EEDA 

20534 122106 000004 TST65: SCOPE 

20535 122110 032737 000200 000052 BIT @BITO7,aeS2 sUFD MODE? 

20536 122116 001402 BEQ 100$ 3IF NOT, CONTINUE 

20537 122120 000137 133514 JMP sEOP sExIT 

20538 122124 005737 002664 100$: TST CSR12 sSECOND Q22BE AVAILABLE? 

20539 122130 001002 BNE 110$ :IF vES, GO DO TEST 

Sonat 122132 000137 133514 JMP sEOP sOTHERWISE, GOTO EOP 
3 

20542 3; DETERMINE WHICH Q22BE IS CLOSER TO CPU BY DOING DATO 

ooree ; THE CSR1 OF THE ONE WITH HIGHER PRIORITY IS IN R&, THE SECOND IN R2 
é 

20545 122136 005077 060504 1108; CLR acsR2 ;CLEAR JUST IN CASE 

20546 122142 005077 060520 CLR acsR2e2 

20547 122146 012777 002710 060474 MOV TEMP ,aBA ;ADORESS TO BE USED 

20548 122154 012777 002710 060506 MOV OTEMP ,aBA2 sFOR BOTH OF THEM 

20549 122162 012777 177777 060462 MOV 177777,awc 3:00 FOR 1 WORD 

20550 122170 012777 177777 060474 MOV #177777,awC2 3IN BOTH Q22BwW'S 

20551 122176 012777 012525 060450 MOV #12525,@DATA sDATA FOR 1ST 

20552 122204 012777 052525 060462 MOV 052525 ,@DATA2] ;DATA FOR 22ND 

20553 122212 012777 001601 060424 MOV #1601,aCSR1 31 DATO FOR 1ST 

20554 122220 012777 001601 060436 MOV #1601,a9CSR12 sAND 2ND 

20555 122226 012777 000001 060426 MOV 1,@SIMGOA ;BOTH GO 

20556 122234 105777 060404 1$: TSTB acsRi sFIRST DONE? 

20557 122240 100375 BPL 1$ sIF NOT, WAIT 


20558 122242 105777 060416 2s: TSTB acsRi2 sSECOND DONE 


COKDABO KDJ11 6 CLUSTER 
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122246 
122250 
122256 
122260 
122264 
122270 
122272 
122276 


122302 
122310 
122314 
122320 
122324 
122330 
122334 
122340 
122344 
122350 
122356 
122364 
122370 
122374 
122462 
122410 
122414 
122422 
122424 
122432 
122434 
122436 
122442 
122446 
122452 
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100375 
022737 
001405 
013704 
013702 


000404 
013704 
013702 


013737 


000005 
023762 


MACY1L1 30( 1046) 
16:45 
052525 002710 


002664 
002644 


002644 
002664 


177520 002710 
000001 


000007 177520 


000006 
000002 
002710 000004 
177777 000006 
000001 060076 
002710 000010 


05 - APR - 
TEST 


3$: 


i 
; INITIATE DMA CYCLES TO WORK WITH PMG COUNTER 


Hy 
4$: 
S$: 


6$: 


7$: 


8$: 


- PMG COUNTE 
BPL 2s 
CMP #52525, TEMP 
BEQ 3$ 
MOV CSR12,R4 
MOV CSR1,R2 
BR 4$ 
MOV CSR1,R4 
MOV CSR12,R2 
MOV BCSR,SAVBR 
MOV “BITOO,RO 
BIS RO,BCSR 
TST 6$ 
TST 6$+2 
TsTt 6$+4 
TST 6$+6 
MOV #1407,(R4) 
CLR 2(R4) 
MOV @TEMP ,4(R4) 
MOV 00 ,6(R4) 
MOV #1407,(R2) 
CLR e(Re) 
MOV @TEMP ,4(R2) 
MOV #177777,6(R2) 
CLR 10(R2) 
MOV #1,16(R2) 
RESET 
CMP TEMP, 10(R2) 
BNE 7$ 
ERROR +127 
ADD 3,RO 
BIC RO,BCSR 
CMP #7,RO 
BGE 5$ 

Hy 

; TRY WITHOUT PMG COUNTER OPERATING 
BIC #7,BCSR 
TST 8$ 
TST 8$+2 
TST 8$+4 
TST 8$+6 
MOV #1407,(R4) 
CLR eC R4) 
MOV &TEMP ,4(R4) 
MOV #0,6(R4) 
MOV #1407,(R2) 
CLR 2(R2) 
MOV @TEMP ,4(R2) 
MOV #177777,6(R2) 
CLR 10(R2) 
MOV #1,@SIMGOA 
RESET 
CMP TEMP, 10(R2) 


GL5 


84 ee _ 396 


sWAIT FOR 2ND 

sSECOND FINISHED LAST? 

;IF SO, BRANCH 

sSECOND ONE AT HIGHER LEVEL 
sFIRST AT LOWER 

3:00 PMG PART 

sFIRST ONE AT HIGHER LEVEL 
sSECOND AT LOWER 


;STORE BCSR REGISTER 

sFIRST VALUE FOR PMG 0.4MSEC 
sCHANGE PMG CONUTER 

;CACHE RESET INTRUCTION 

sAND THE FOLLOWING FEW 

3 


3 

sDATI IN HOG MODE FOR HIGHER ONE 
;CLEAR CSR2 

sADDRESS TO START DATI 

300 128 DATI'S IN HOG MODE 
;DATO FOR LOWER LEVEL ONE 
;CLEAR JUST IN CASE 

;USE THE SAME ADDRESS 

300 JUST ONE DATO 

;CLEAR DATA OF 22ND Q22BE 
;BOTH GO 

sSTOP Q22BE AT R4 

;SECOND DMA DONE? 

;IF SET, BRANCH 

sNO CYCLE STEALING 

3:00 FOR 1,3.7 IN PMG 

sCLEAR PREVOIUS BITS IN BCSR 
3;LAST ONE? 

3IF NOT, BRANCH 


;TURN OF PMG COUNTER 
sCACHE RESET FETCH 
sAND THE FOLLOWING FEW 
é 


é 

sOATI IN HOG MODE FOR HIGHER ONE 
sCLEAR CSR2 

sADDRESS TO START DATI 

300 128 DATI’'S IN HOG MODE 
sDATO FOR LOWER LEVEL ONE 
;CLEAR CRS2 OF 2ND 

sUSE THE SAME ADDRESS 

300 JUST ONE DATO 

sCLEAR DATA OF 2ND Q2cBE 
;BOTH GO 

3IF NOT WORKING, STOPS OND 
32ND DMA HAPPENED? 


SEQ 0395 


HLS 
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COKDAB.P11-OS-APR-84 16:45 TEST _ PMG COUN SEQ 0296 
20015 122574 001401 BEQ 9$ IF YES, BRANCH 

30616 122576 104127 ERROR +127 IN PMG COUNTER 

20617 122600 018787 002710 177520 98: MOV SAVBR,BCSR RESTORE BCSR 

50619 

20620 TEASSAASHAESHHEHEHEHEEESESHE SHEE ESEESEEHESASEEESEEEHESEHEEEEEHEEEEESD 

30021 122608 000004 S166: SCOPE 


20623 1226010 000137 133514 JMP $EOP 


COKDABO KDJ11-8 CLUSTER 
05 - APR - 84 


COKDAB .P11 


20679 123260 


MACY11 
16:45 


051122 


053517 
020105 
054524 
051117 
043511 
042524 
052111 
047522 
047522 
042040 
040520 


051117 
051511 
042101 
046517 
042519 


30( 1046) 


020103 
0S2522 
020116 
051105 


051105 
051105 


020122 
040505 
052111 
051524 
041503 


020105 
053440 
020123 
041501 


042503 


051122 


040520 
042440 
000 


020101 
054524 
051117 


115 
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GLOBAL ERROR MESSAGES 


.SBTTL GLOBAL ERROR MESSAGES 


EM1: .ASCIZ 
EM2: .ASCIZ 
EMS: .ASCIZ 
EM4: .ASCIZ 
EMS: .ASCIZ 
EM6: .ASCIZ 
EM?: .ASCIZ 
EM1O: -ASCIZ 


EML1: -ASCI2Z 


EM12: -ASCIZ 


EM13: -ASCIZ 


EM14: -ASCIZ 


EM15: -ASCIZ 


/BASIC INSTRUCTION SET ERROR/ 


/MMU ERROR/ 
/FPP ERROR/ 
ZERROR IN READ-WRITE BITS OF CCR/ 


/FORCE MISS WRITES TO CACHE/ 


/FORCE MISS WRITE INVALIDATES CACHE / 


/UNEXPECTED PARITY INTERRUPT / 
“TAG PARITY ERROR/ 

/DATA PARITY ERROR/ 

/LOW BYTE PARITY ERROR/ 

/HIGH BYTE PARITY ERROR/ 
ZERROR IN DATA PATH/ 


/FORCE MISS READS FROM CACHE / 


SEG 0397 


COKDABO KDJ11 B CLUSTER MACY11 


COKDAB.P11 


123265 


123742 
123750 
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051117 
051511 
042101 


051105 
020123 
046103 
047117 
042524 
051105 


30( 1046) 


042503 
020123 
020123 
041440 
040440 
051511 


020122 
041505 
043516 

20123 
052111 
000123 
020105 
040440 
052101 
041501 


042524 
020105 
047504 
052117 
051117 
000124 
020123 
051522 
020116 
020105 
051505 


044504 
046101 
051501 
051505 
047111 
040504 
041501 


020123 
042122 


J1L5 


OS-APR-84 16:45 PAGE 399 
GLOBAL ERROR MESSAGES SEQ 0396 
EM16: -ASCIZ /FORCE MISS READS FROM CACHE AND MISS/ 
EM17: -ASCIZ \ERROR IN RECORDING HITS IN HIT/MISS\ 
EM20: -ASCIZ /WRITE BYTE ALLOCATES CACHE/ 
EM21: -ASCIZ /WRITE BYTE HIT DOES NOT RECORD HIT/ 
EM22: -ASCIZ /BYTES REVERSED ON WRITE CYCLES/ 
EM23: -ASCIZ /CONDITIONAL BYPASS DOESN'T INVALIDATE CACHE / 
EM24: -ASCIZ /HITS RECORDED AFTER FLUSHING CACHE / 
EM25: -ASCIZ /BYPASS DOESN'T INVALIDATE CACHE / 
EM26: -ASCIZ /MSER DOES NOT CLEAR ON WRITE REFERENCE’ 


COKDABO KDJ11-B CLUSTER MACY11 
COKDAB.P11 16:45 


123756 
123761 
123766 
123774 
124002 
124010 
124016 
124021 
124026 
124034 
124042 
124050 
124056 
124064 
124072 
124073 
124100 
124106 
124114 
124120 
124126 
124134 
124142 
124150 
124156 
124161 
124166 
124174 
124202 
124210 
124216 
124223 
124230 
124236 
124244 
124252 
124260 
124263 
124270 
124276 
124304 
124311 
124316 
124324 
124332 
124340 
124346 
124354 
124355 
124362 
124370 
124376 
124404 
124412 
124417 
124424 


OS - APR - 84 


051105 


30( 1046) 05-APR-84 
GLOB 


052111 
047522 
023516 
051525 
044515 


052111 
047522 


052111 
047522 
047516 


054524 
051117 
051117 
020116 
054502 


0S2111 


000 
052111 
051117 


K15 


16:45 PAGE 400 


AL ERROR MESSAGES SEQ 0399 


EM27; -ASCIZ 


EM30: -ASCIZ 


EM31: -ASCIZ 


EM32: -ASCIZ 


EM33: -ASCIZ 
EM34: -ASCIZ 
EM35: -ASCIZ 
EM36: -ASCIZ 
EM37: -ASCIZ 
EM40: »-ASCIZ 


/PARITY ERROR DON'T CAUSE A MISS/ 


/PARITY ERROR DON'T SET MSER WITH CCR<7>=0/ 


7PARITY ERROR IGNORED/ 


/PARITY ERROR IGNORED ON LOW BrTE/ 


/PARITY ERROR IGNORED ON HIGH BYTE/ 


/PARITY ABORT LOGIC DOESN'T WORK/ 


/MSER NOT SET PROPERL Y/ 


/PARITY INTERRUPT LOGIC DOESN'T WORK/ 


/NXM AND PARITY ABORT DIN‘ T HAPPEN/ 


/PARITY ABORT NOT BLOCKED 81 NXM TRAP/ 


COKDABO KDJ11-8 CLUSTER MACY11 
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20792 
20793 


124432 
124440 
124446 
124454 
124462 
124464 
124472 
124500 
124506 
124514 
124522 
124530 


125112 
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020124 


16:45 


047516 
041517 
054502 
052040 


051122 
020116 
047111 
042116 
020105 

000 


051122 
020116 
042122 
044510 
051110 
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020124 


020122 
051101 
047514 


020122 
041501 
052101 
051515 


051117 
054116 
051440 
046101 
047515 


051117 
042522 
047111 
051524 
052517 
oSeill 
020123 
052123 


020123 
042122 
051117 
041517 
020116 
051440 
020104 
020116 


L115 
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GLOBAL ERROR MESSAGES 


EM41: »ASCIZ 
EM42; -ASCIZ 
EM43: .ASCIZ 
EM44: .ASCIZ 
EM45: -ASCIZ 
EM46: -ASCIZ 
EM47: -ASCIZ 


/MULTI-PROCESSOR HOOK INSTRUCTION DOESN’ T CAUSE MISS/ 


7ERROR IN PARITY LOGIC/ 


ZERROR IN CACHE DATA RAMS/ 


ZERROR IN NXM IN STANDALONE MODE / 


\NERROR IN RECORDING HITS THROUGH HIT/MISS REGISTER\ 


7HIT RECORDED FOR A LOCATION THAT SHOULD NOT BE IN CACHE/ 


/MISS RECORDED FOR A LOCATION THAT SHOULD BE IN CACHE / 


SEQ 0400 


COKDABO KDJ11-B CLUSTER MACY11 
COKDAB.P11 


125556 
125564 


05 - APR - 84 


051524 


16:45 


30( 1046) 05-APR-84 
GL 


000105 
020122 
043501 
042522 


051117 
051040 
051127 
044502 


051117 
041502 
040505 
052111 
051524 


052105 
047123 
042514 
051503 

000 


045503 
051105 
047111 
044502 
020115 


045503 
051105 
047111 
052111 


000 
047505 
040505 
046040 


030074 


047117 


M15 


16:45 PAGE 402 


OBAL ERROR MESSAGES 


EMSO: 


EMS1: 


EMSe: 


EMS3: 


EMS4: 


EMSS: 


EMS6: 


EMS7: 


EM60: 


EM61: 


EM6e: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


ZERROR IN TAG STORE/ 


ZERROR PCR READ-WRITE BITS/ 


ZERROR IN BCSR READ-WRITE BITS/ 


/RESET DOESN’ T CLEAR BCSR<4>/ 


/CHECKSUM ERROR IN 16-BIT ROM / 


/CHECKSUM ERROR IN 8-BIT ROM/ 


/TIMEOUT READING LKS/ 


/LKS<07> DOES NOT BECOME 1/7 


/WRITE REFERENCE DOESN'T CLEAR LKS<0O7>/ 


ZILLEGAL LKS INTERRUPTS/ 


/PROCESSOR INTERRUPTS DON’T CLEAR LKS<07>/ 


SEQ 0401 


COKDABO KDJ11-8 CLUSTER MACY11 
COKDAB .P11 


OS-APR-84 16:45 


041440 
046040 
037067 
051513 
054504 
047123 
020117 


047117 
041115 
020106 
047111 
050125 


051513 


051105 
020123 


051440 


30( 1046) 05-APR-84 
GL 


042514 
051513 


000 
051040 
042040 
052047 
047514 


020107 
051105 
045514 
042524 
051524 


044440 
oS2522 


N15 


16:45 PAGE 403 


OBAL ERROR MESSAGES 


EM63: -ASCIZ 
EM64 : -ASCIZ 
EM6S: -ASCIZ 
EM66: -ASCIZ 
EM67: -ASCIZ 
EM70: -ASCIZ 
EM71: -ASCIZ 
EM7e: -ASCIZ 
EM73: -ASCIZ 
EM74; -ASCIZ 


/LKS READY DOESN'T GO LOW/ 


7WRONG NUMBER OF LKS INTERRUPTS/ 


/LKS INTERRUPTS HAPPEN AT WRONG PRIORITY/ 


/BCSR<12> DOES NOT DISABLES LKS/ 


/BCSR<13> DOESN'T SET LKS<06>/ 


/RESET DOESN'T SET LKS<7>/ 


/RESET DOESN'T CLEAR LKS<06>/ 


“TIMEOUT READING SLU REGISTERS/ 


7ERROR IN XMIT READY/ 


/RCSR<7> DOESN'T BECOME 1/7 


SEQ 0402 


COKDABO KDI11 B CLUSTER 


COKDAB .P 


11 


126730 


051505 
051440 


MACY LI 


APR -84 16:45 


047522 
040510 
051105 
044505 


051123 


047040 


30( 1046) 


052101 


052105 
020123 
046103 
051120 
041040 
047111 
051040 
042524 


051516 


053111 
042524 
051524 
052047 


051040 


Blt 


O5-APR 84 16:45 PAGE 404 
GLOBAL ERROR MESSAGES 


EM75;: -ASCIZ 


EM76: -ASCIZ 


EM7?: -ASCIZ 


EM100: .ASCIZ 


EM101: .ASCIZ 


EM102: .ASCIZ 


EM103; .ASCIZ 


EM104;: .ASCIZ 


EM105: .ASCIZ 


/WRONG CHARACTER RECE IVED/ 


/RCSR<07> NOT CLEARED AFTER READING RBUF 7 


/xCSR«O7> NOT SET ON RESET/ 


/RCSR<O7> NOT CLEARED ON RESET/ 


/SLU INTERRUPTS HAPPEN AT 4” 


7RESET DOES NO’ CLEAR PROPER BITS IN SLU REGISTERS 


“TRANSMIT INTERRUPT DOES NOT CLEAR *C5R«O7> 


e 


/RECEIVE INTERRUPTS DON'T CLEAR RCSR«<O%> 


/BREAK CONDITION DOES NOT SET RBUF PROPER » 


0405 


COKDABO KDIJ11 B CLUSTER 


COKDAB.P 11 


21016 
21017 
21018 


126736 
126744 
126752 
126753 
126760 
126766 
126774 
127002 
127010 
127016 
127024 
127031 
127036 
127044 
1270S2 
127060 
127066 
127074 
127102 
127110 
127116 
127124 
127130 
127136 
127144 
127152 
127160 
127166 
127174 
127202 
127206 
127214 
127222 
127230 
127236 
127244 
127252 
127260 
127266 
127271 
127276 
127304 
127312 
127320 
127326 
127334 
127342 
127350 
127355 
127362 
127370 
127376 
127404 
127412 
127420 
127426 


OS -APR -84 


052123 


MACY11 80( 1046) 


16:45 


020106 
051105 


051120 
054514 


020106 


052123 
020124 


051122 
052111 
042522 
041440 
042105 


020115 
040504 


05 


Clo 


6:45 PAGE 40% 


APR-84 16; 4° 
GLOBAL ERROR MESSAGES 


EM106: .ASCIZ 


EM107: .ASCIZ 


—EM110: .ASCIZ 


FML11: .ASCIZ 


EMlle: .ASCIZ 


EM113: .ASCIZ 


EM114: .ASCIZ 


—M115: .ASCIZ 


/RBUF «15-11» WASN'T CLEARED ON NEXT CHARACTER? 


/SLU INTERRUPTS DON'T HAPPNEN/ 


7ZERROR IN WRITING TO SLU REGISTERS” 


ZFIRST CHARACTER WAS NOT OVERRUN Br THE SECOND’ 


ZOVERRUN CONDITION DOES NOT SET PROPER BITS IN RBUE - 


‘OVERRUN BITS WERE NOT CLEARED ON THE NEXT CHARACTER 


NERROR ON XCSR«2>\ 


ZERROR IN TAG STORE FROM STANDALONE MODE 


SEQ 0404 


COKDABO KDU11 B oy ysres MACY11 3001046) 


COKDAB.P11 


127434 
127442 


130116 


OS - APR -84 


047514 
042117 
046504 
020107 
054524 
020123 
042507 
042524 
042520 
050123 


051105 


16:45 


042040 


046440 


040524 
044522 
042517 
020124 
040522 
047522 
042522 
042523 


051127 


020122 
031062 
040515 
042514 


052522 


053517 
053517 


05 APR 8&4 
GLOBAL ERROR ihe SAGES > 


EM116; 


EM11?7; 


EM120: 


EM121: 


EM12e2: 


EM123: 


EM124; 


EM125; 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCIZ 


|) | a 


6:45 PAGE 406 


/DMA TAG PARITY DOES NOT GENERATE PROPER RESPONSE / 


/MSER<13>NOT SET IN STANDALONE MODE / 


/DMA WRITE HITS DON'T INVALIDATE CACHE / 


7IN BLOCK MODE ON WRITE DMA HITS NOT EVERT THING IS INVALIDATED/ 


7READ DMA HIT IS WRONG/ 


7ERROR IN Q22BE OMA CICLES/ 


/PIRQ INTERRUOTS DON'T TAKE PRIORITY OVER Q BUS INTERRUPTS 


/NO POWER DOWN TRAP TO 24 OCCUR 


SEQ 0405 


COKDABO KNJ11-B CLUSTER 


COKDAB.P11 


21136 


130124 
130132 
130140 
130146 


130560 
130546 


O05 - APR -84 


020116 
052040 


051511 
052040 
051105 

012 


040 
041520 
040 


MACY11 30( 1046) 


16:45 


051124 
020117 
041503 


051122 
044517 
031062 
052116 
052120 
047522 
047440 
044524 
020106 
047503 
000122 
054105 
042105 
020120 

000 


0S1122 
044522 
052040 
0361235 


051122 
020116 
047105 
051040 
042524 


05150. 
047522 


021440 
000 


050101 
032062 
051125 


051117 
043516 
042502 
051105 
000123 
020122 
042520 
047117 
046520 
047125 


042520 
052040 
047524 


051117 
044524 
020117 
037066 


051117 
040515 


020011 


051117 


F16 


OS-APR-84 16:45 PAGE 407 
GLOBAL ERROR MESSAGES 


EM126: .ASCIZ 


EM127: .ASCIZ 


EM130: .ASCIZ 


EM131: .ASCIZ 


EM132: .ASCIZ 


DH1: -ASCII 
-ASCIZ 
DH4; -ASCIT 
-ASCIZ 
DHS: ASCII 
-ASCIZ 


7ZERROR DOING Q22BE INTERRUPTS/ 


ZERROR IN OPERATION OF PMG COUNTER/ 


/UNEXPECTED TRAP TO 4/ 


7ZERROR WRITING TO LKS<6>/ 


7ZERROR IN MAITENANCE REGISTER/ 


/ TEST ERROR/<15><«12> 


/ *® PC/ 
/ TEST ERROR EXPCTED RECEIVED/<15*<12> 


4 @ Pc DATA DATA’ 


TEST ERROR HITMIS DATA IN DATA IN/<15>«12> 


f # Pc REG, CACHE ME MOR» - 


SEQ 0406 


CIRDABO KDILT B CLUSTER 


COKDAB.P 11 


131237 


OS - APR - 84 


MACY11 30( 1046) 
16:45 


052123 
051117 
042522 
042523 


020011 
041505 
000104 
£04524 
004522 
051105 


050040 
044040 


004522 
004522 
044011 
051511 


020011 
052123 
051117 
051124 
047117 


050040 
041520 


051117 


1 
021440 020011 


05 APR-84 16:45 PAGE 
GLOBAL ERROR MESSAGES 
DH?: ASCII 7 TEST 

-ASCIZ 7 @ 
DH24; ASCII 7/7 TEST 
-ASCIZ a 
OH27: .ASCII \ERROR 
-ASCIZ 47 @ 
OH41: -ASCII / TEST 
-ASCIZ /’ @ 
OH43: -ASCII 7 TEST 
ASCIZ + © 
OH47: -ASCII 7/ TEST 
-ASCIZ 7 
OH65: -ASCII 7 TEST 


PC 


ERROR 


PC 


ERROR 


PC/ 
ERROR 


PC 


ERROR 


PC 


ERROR 


pc 


ERROR 


ADDRESS MSER/<15><12> 


ACCESSED/ 


NUMBER/<15><12> 


OF HITS/ 


MSER HIT/MISS\<15><12> 


INSTRUCTION’<15><12> 


OPCODE / 


EXPECTD RECEIVD CACHE /<15><12> 


Nata DATA LOCATION/ 


ADDRESS ADDRESS/«15><12> 


<21-16> 


«<15-O>/ 


PRIORITr/<15>< le» 


Le vet 


SEQ 0407 


COKDABO KDJ11-B8 CLUSTER 


COKDAB.P11 


21240 


131244 


131430 
131436 
131444 
131450 
131456 
131464 
131472 
131476 
131504 
131510 
131516 
131522 
131530 
131532 
131540 
131544 
131552 
131556 
131564 
131566 
131574 
131602 
131610 
131614 
131622 
131626 
131634 
131640 
131646 
131652 
131660 


OS - APR - 84 


MACY11 
16:45 


30( 1046) 


053105 
052123 
051117 
042522 


050040 
046111 


052123 
051117 
006506 
020011 


052123 


051505 
020911 


000002 
000000 
001122 
001124 
001124 
000003 
177744 
001124 


000001 
001124 
001124 
6v1124 


(, ine 


OS-APR-84 16:45 PAGE 409 
GLOBAL ERROR MESSAGES 


DH7e: -ASCIT 


-ASCIZ 


OH105: .ASCII 


-ASCIZ 
OH115: .ASCII 


-ASCIZ 

-EVEN 
Dra: “WORD 
OTS: . WORD 
DT7 . WORD 
DOT14: . WORD 
OT17: . WORD 
DT24: . WORD 
DT27: . WORD 
DT35: . WORD 
OT41: . WORD 
DT43: . WORD 
OT47: . WORD 
OTSO: WORD 
OTS1: . WORD 
DTSe: . WORD 
DTé64; . WORD 


/ TEST ERROR 


yr @ PC 


/ TEST ERROR 


o PC/ 
7 TEST ERROR 


$TMP1, SERRPC,O 


ADDRESS/<15><12> 


FAILED/ 


RAL 7 <15><1l2> 


MSER ADDRESS /« 15><12> 


ACCESSED/ 


$TMP1, SERRPC,R1,CCR,O 


$TMP1, SERRPC,R2,R1,$GDDAT ,O 
$TMP1, SERRPC, $BDADR ,MSER,O 
$TMP1, S$ERRPC,$GDDAT,TSTLOC,O 
$TMP1, SERRPC, $GODAT ,RECDAT,O 
$TMP1, SERRPC,R3,0 


$TMP1, SERRPC ,MSER,R3,0 

$TMP1, SERRPC, $SGDDAT ,MSER,O 
$TMP1, $SERRPC, SBDODAT,O 

$TMP1, SERRPC,R1,RECDAT, $BDADR,O 
$TMP1, SERRPC,KIPAR6, $BDADR,O 
$TMP1, SERRPC,R1, $BDADR,O 

$TMP1, SERRPC, $GDDAT ,PCR,O 
$TMP1, SERRPC, $GDDAT,BCSR,O 
$TMP1, SERRPC, $GDDA, ,i.KSFL ,O 


SEQ 0408 


COKDABO KDI11 6 
COKDAB.P 11 


131664 
131672 
131674 
131702 
131706 
131714 
131716 
131724 
131732 


CLUSTER 
05 - APR 


MACY 11 


84 16:45 


001162 


001116 
001116 
000000 
001116 
001116 


001122 
001122 


30( 1046) 


001124 


Hie 


16:45 PAGE 410 


AL ERROR MESSAGES 


oi 

D165: . WORD 
DT75: . WORD 
DT105: .WORD 
OT115: .WwORD 
OT130: .WwORD 


$TMP1, SERRPC, $GDDAT,O 

$TMP1, SERRPC, $GDDAT, $BDDAT,O 

$TMP1, SERRPC,RBUF ,O 

$TMP1, SERRPC, $BODAT ,K IPAR6, $BDADR,O 
$TMP1, $SBDADK,O 


SEG 0409 


116 


COKDARO KDJ1i-B CLUSTER MACY11 30(1046) OS5S-APR-84 16:45 PAGE 411 


COKDAS .P11 


131740 
131740 
131744 
131752 
131756 
131760 
131762 
131766 


131770 
131774 


132126 
132130 


OS5-APR-84 16:45 


021027 
101021 
042737 
011037 
000337 
006237 
006237 
053737 


010046 
005 720 


001162 
001102 
001175 


001114 


001116 


601324 
132024 


001175 
132042 


001175 


001175 


000005 


000700 
001160 
001160 
001160 
001160 
001160 


001162 


132126 


132126 


MODIFIED ERROR MESSAGE TYPEOUT ROUTINE 
-SBTTL MONIFIED ERROR MESSAGE TYPEOUT ROUTINE 


PPECUS IIIT rrr ritiiitiiitititiitiititititttiTiiitii i iiT) 
:*THIS ROUTINE USES THE “ITEM CONTROL BYTE” ($ITEMB) TO DETERMINE WHICH 
;*ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE “ERROR TABLE” ( SERRTB), 
3*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 


3 & 

3*THE ONLY DIFFERENCE BETWEEN THIS ROUTINE AND THE ORIGINAL "“SERRTYP” FROM 
3*SYSMAC IS THAT vOU CAN PASS INFORMATION IN GENERAL PURPOSE REGISTERS 10 THIS 
;*ROUTINE. THE GENERAL PURPOSE REGISTERS USED ARE TO BE SPECIFIED IN Die 
3*FORMAT. RO SHOULD NOT BE USED. 


ERTYPE: 
CLR $TMPL 3;JUST CLEAR IT 
MOVB $TSTNM, $TMP1 3;STORE TEST NUMBER 
TYPE » $CRLF 33 "CARRIAGE RETURN” & “LINE FEED” 
MOV RO, -( SP) :;SAVE RO 
CLR RO 3sPICKUP THE ITEM INDEX 
BISB aes ITEMB,RO 
BNE 1$ 33IF ITEM NUMBER IS ZERO, JUST 
s;TYPE THE PC OF THE ERROR 
MOV SERRPC, -( SP) 3;SAVE SERRPC FOR TYPEQUT 
3sERROR ADDRESS 
TYPOC 3:GO TYPE--OCTAL ASCIICALL DIGITS) 
BR 6$ 33GET OuT 
1$: DEC RO ::;ADJUST THE INDEX SO THAT IT WILL 
ASL RO 33 WORK FOR THE ERROR TABLE 
ASL RO 
ASL RO 
ADD #sERRTB,RO ::FORM TABLE POINTER 
MOV CRO)+,2$ ssPICKUP “ERROR MESSAGE” POINTER 
te 3$ 33SKIP TYPEOUT IF NO POINTER 
Y 
2s: -WORDB O ::ERROR MESSAGE POINTER GOES HERE 
TYPE » sCRLF 3: "CARRIAGE RETURN” € "LINE FEED’ 
3$; MOV (RO)+,4$ s:PICKUP “DATA HEADER” POINTER 
BEQ S$ 3:SKIP TYPEOUT IF O 
TYPE s3:TYPE THE “DATA HEADER” 
4$: . WORD 0 3; "DATA HEADER” POINTER GOES HERE 
TYPE » CRLF 33 "“CARRIAGE RETURN” € "LINE FEED” 
S$: MOV (RO),RO s3;PICKUP “DATA TABLE” POINTER 
BNE 7$ 3:;GO TYPE THE DATA 
6$: MOV (SP)+,RO 3sRESTUOnc 7 
TYPE » sCRLF 3:;"CARRIAGE RETURN” € "LINE FEED” 
. RTS PC 3: sRETURN 
$: 
CMP CRO), @5 ;;GENERAL PURPOSE REGISTER? 
BHI 9$ 33IF NOT, GO TYPE DATA 
BIC *BITS!BIT7!BIT6,8$ 3;CLEAR BITS FOR SOURCE REGISTER 
MOV (RO), $TMPO 3sSAVE (RO) 
SWAB $TMPO 3;GET REGISTER NUMBER TO HIGH BYTE 
ASR $TMPO 3;GE’ REGISTER NUMBER TO BITS 8-6 
ASR $TMPO 
BIS $TMPO,3$ 3;SET BITS IN MOV INSTRUCTION 
ssACCORDING TO REGISTER NUMBER 
83; MOV RO, -( SP) 3sMOVE CONTEXT OF REGISTER TO STACK 


TST CRO)> ssADVANCE POINTER 


SEQ 0410 


Ilo 


OKDABO KDJ11-B CLUSTER MACY11 30(1046) O5-APR-84 16:45 PAGE 412 


OKDAB.P11 05 -APR-84 16:45 MODIFIED ERROR MESSAGE TYPEOQUT ROUTINE SEQ 0411 
21301 132132 000401 BR 10$ 3;GO TYPE 
21362 132134 013046 9$: MOV @(RO)+, -CSP) 33IF NOT GPR, SAVE @(RO)+ FOR TrPEQUT 
21363 132136 104402 108; TYPOC 3:;GO TYPE--OCTAL ASCI (ALL DIGITS) 
21364 132140 005710 TsT (RO) 3:I1S THERE ANOTHER NUMBER? 
21365 132142 001744 BEQ 6$ ;;BR IF NO 
21366 132144 104401 132152 TYPE 11% 33 TYPE TWOC2) SPACES 
21367 132150 000745 BR 7$ 
21368 132152 20040 000 118: MT # £ 33TWOC2) SPACES 
oa 132156 .EVEN 
< ‘ 
21371 -SBTTL GLOBAL SUBROUTINES SECTION 
21372 
21373 pes 
21374 ; THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
21375 ; THAT ARE USED IN MORE THAN ONE TEST. 
21376 ae 
21377 
21378 ‘ gee 
2137 ; FUNCTIONAL DESCRIPTION: 
Lifes H SUBROUTINE TO INITIALIZE ALL THE MMU REGISTERS 

1381 
21382 
21383 3; INPUTS: NONE 
21384 
21385 3 OUTPUTS: NONE 
21386 
21387 ; SUBORDINATE ROUTINES USED: LOAD PARS 
21388 ; LOAD PDRS 
21389 
pte ; FUNCTIONAL SIDE EFFECTS: NONE 
ages | ; CALLING SEQUENCE: JSR PC, INITMM 
21394 132156 012701 172240 INITMM: MOV #172240,R1 ;BASE ADDRESS OF SIPARS 
21395 132162 004737 132320 JSR PC, LOPARS 
21396 132166 012701 172260 MOV #172260, R1 ;BASE ADDRESS OF SDPARS 
21397 132172 004737 132320 JSR PC, LOPARS 
21398 132176 012701 172340 MOV #172340, R1 ;BASE ADDRESS OF KIPARS 
21399 132202 004737 132320 JSR PC, LOPARS 
21400 132206 012701 172360 MOV #172360, R1 ;BASE ADDRESS OF KDPARS 
21401 132212 004737 132320 JSR PC, LOPARS 
21402 132216 012701 177640 MOV 0177640, R1 sBASE ADDRESS OF UIPARS 
21403 132222 004737 132320 JSR PC, LOPARS 
21404 132226 012701 177660 MOV #177660, R1 ;BASE ADDRESS OF UDPARS 
21405 132232 004737 132320 JSR PC, LOPARS 
21406 132236 012701 177600 MOV #177600,R1 ;BASE ADDRESS OF UIPDRS 
21407 132242 004737 132350 JSR PC, LOPORS 
21408 132246 012701 177620 MOV #177620, R1 ;sBASE ADDRESS OF UDPDRS 
21409 132252 004737 132350 JSR PC, LDPORS 
21410 132256 012701 172300 MOV #172300,R1 sBASE ADDRESS OF KIPORS 
21411 132262 004737 132350 JSR PC, LOPOS 
71412 132266 012701 172320 MOV #172320,R1 ;BASE ADDRESS OF KDPORS 
21413 132272 004737 132350 JSR PC, LOPDRS 
21414 132276 012701 172200 MOV #172200,R1 sBASE ADDRESS OF SIPDRS 
21415 132302 004737 132350 JSR PC, LOPDRS 


21416 132306 012701 172220 MOV #172220, R1 3BASE ADDRESS OF SDPDRS 


K16 
COKDABO KDJ11-B CLUSTER MACY11 30(1046) O5-APR-84 16:45 PAGE 413 
COKDAB.P11 OS -APR-84 16:45 GLOBAL SUBROUTINES SECTION SEQ 0412 


21417 132312 004737 132350 JSR PC, LOPORS 
21418 132316 000207 RTS PC RETURN 


COKDABO KDJ11-B CLUSTER MACY11 30( 1046) 


COKDAB.P11 


21419 


132320 
132324 
132326 
132330 
132334 
132336 
132342 
132346 


05 -APR-84 16:45 


012702 


000006 


000200 


002000 
177600 


05 - APR - 84 
GL 


- 16 


16:45 PAGE 4 


OBAL SUBROUTINES SECTION 


3; INPUTS 


FUNCTIONAL DESCRIPTION: 
SUBROUTINE TO INITIALIZE ALL THE MMU PAGE ADDRESS REGISTERS (PARS). 
THIS ROUTINE WILL INITIALIZE 8 PARS STARTING AT A BASE ADDRESS 
SUPPLIED BY THE CALLING ROUTINE. PARS 0-5 WILL BE MAPPED FROM 
ADDRESS 0 TO ADDRESS 137777 (0-24K). PAR 6 WILL BE MAPPED FROM 
ge 200000 TO 217777 AND PAR 7 WILL BE MAPPED TO THE [7/0 


i R1 CONTAINS THE BASE ADDRESS OF THE NEXT 8 PARS TO BE INITIALIZED 


3; OUTPUTS: 


NONE 


; SUBORDINATE ROUTINES USED: NONE 
; FUNCTIONAL SIDE EFFECTS: NONE 


; CALLING SEQUENCE: JSR 

LOPARS: MOV #6, Re 
CLR R3 

1$: MOV R3, (R1)> 
ADD #200, R3 
SOB Re, 1$ 
MOV #2000, (R1)- 
MOV #177600,(R1) 
RTS PC 


PC,LDPARS . 


;LET LOOP COUNTER COUNT FIRST 6 PARS 
sINTTIALIZE INDEX VALUE 

3LOAD PARS 

s INDEX IN 4K INCREMENTS 

;LOAD FIRST SIX PARS 

;LET PAR6 MAP TO 20000C 

;LET PAR? MAP TO I/O PAGE 

;RETURN 


SEQ 0412 


COKDABO KDJ11-8 


COKDAB .P11 


2144? 
21448 
21449 
21450 
21451 
21452 
21453 
21454 
21455 
21456 
21457 
21458 
21459 
21460 
21461 
21462 
21463 
21464 
21465 
21466 
21467 
21468 
21469 
21470 
21471 
21472 
21473 


132350 
132354 
132360 
132362 
132366 
132372 


012702 
012721 
077203 
012721 
012711 
000207 


CLUSTER MACY11 30( 1046) 
O05 - APR - 84 


16:45 


000006 
177406 


077406 
077406 


oe ee e+ ee of of oF os oF 
* 
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GLOBAL SUBROUT INES SECTION 


FUNCTIONAL DESCRIPTION: 

SUBROUTINE TO INITIALIZE ALL THE MMU PAGE DECRIPTOR REGISTERS (PORS). 
THIS ROUTINE WILL INITIALIZE 8 PDRS STARTING AT A BASE ADDRESS 
SUPPLIED BY THE CALLING ROUTINE. PORS 0-5 WILL BE INITIALIZED TO 
4K READ/WRITE BYPASS AND PORS 6 AND 7 WILL BE INITIALIZED TO 
4K READ/WRITE NO BYPASS. 

NOTE: THERE IS NO NEED TO BYPASS ON I/O PAGE REFERENCES BECAUSE 
THE CACHE DOES NOT ALLOCATE ANY OF THESE REFERENCES. 


INPUTS: 
R1 CONTAINS THE BASE ADDRESS OF THE NEXT 8 PDRS TO BE INITIALIZED 


OUTPUTS: NONE 
SUBORDINATE ROUTINES USED: NONE 
FUNCTIONAL SIDE EFFECTS: NONE 


; CALLING SEQUENCE: JSR PC,LDPARS 
LOPORS: MOV #6, R2 sLET LOOP COUNTER COUNT FIRST 6 PARS 
1$: MOV #177406,(R1)+ ;LOAD PDRS WITH 4K READ/WRITE BYPASS 
SOB Re, 1$ 3LOAD FIRST SIX PORS 
MOV #77406, (R1)+ ;LET PAR6 BE 4K READ/WRITE NO BYPASS 
MOV #77406, (R1) sLET PAR7 BE 4K READ/WRITE NO BYPASS ALSO 


RTS PC sRETURN 


SEQ 0414 


Cc 
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132452 
132460 
132462 


132520 


1352522 


011637 
032737 


032737 
001401 
000207 


013701 
012737 


062 702 


001122 
000100 


000200 


000040 


177744 
002702 


001000 


009020 


177744 


177744 


177744 


177750 


5 


AL SUBROUTINES SECTION 


tn yh KDJ11-8 CLUSTER MACY11 30(1046) O5-APR-84 16:45 PAGE 416 
OKDAB . GLOB 


ee 
+ FUNCTIONAL DESCRIPTION: 
SUBROU 


INPUTS 


s OUTPUTS: NONE 


1 SUBORDINATE ROUTINES USED: NONE 
s FUNCTIONAL SIDE EFFECTS: NONE 


| 


TINE TO HANDLE PARITY ERROR ABORTS FROM THE RAM STORE RAM TESTS. 


: 
MEMORY SYSTEM ERROR REGISTER CONTAINS BITS INDICATING FAILURE 


sSAVE CONTENTS OF PARITY ABORT VECTOR 
sLET VECTOR POINT TO PARITY ABORT ROUTINE 


sSTOR ADDESS TRAPPED 

3IF LOW BYTE PARITY ERROR 
3 THEN 

sERROR 

sIF HIGH BYTE PARITY ERROR 
3 THEN 


sERROR 
sIF TAG PARITY ERROR 
T INITIALIZE MSER AFTER ERROR 


sRETURN 
s INCREMENT FLAG 


s CALLING SEQUENCE: CALLED BY PARITY ABORT 
8 MOV 80114, SLOCOO 
3 MOV @DSPAR, 80114 
3 
3 (CACHE PARITY ERROR OCCURS) 
RAMPAR; MOV (SP), $BDADR 
BIT @BITO6, MSER 
BEQ 18 
ERROR 7? 
18: BIT @BITO7, MSER 
BEQ es 
ERROR 7? 
2s: BIT @BITOS, MSER 
BEQ 33 
ERROR 7 
3$: CLR MSER 
RTI 
LKSINT: INC LKSFL 
RTI 


-SBTTL Q22BE SIZE ROUTINE 


sTHIS ROUTINE WILL AUTOSIZE FOR UP TO TWO G22 BUS EXERCISERS. IF NONE 
sFOUND LOCATIONS CSR1 AND CSR12 WILL BE LEFT ZEROES. THIS ROUTINE WILL 


sONLY RUN IN NOT UFO MODE. 


Q22SIZ: BIT @B1T09, MATREG 
BEQ 18 
RTS PC 

8 

3 PREPARE TO DO SIZING 

; 

18: MOV ERRVEC,R1 
MOV @7$ .ERRVEC 
MOV €340,ERRVEC +2 
CLR sTMPO 
MOV #170000 ,R2 
MOV ©510,R5 
BR LT} 

3 

s NOW DO ACTUAL SIZING 

o 

2s: ADD 020 ,R2 


sUNIBUS SYSTEM? 
:IF NOT, ADVANCE TO ROUTINE 
sOTHERWISE, RETURN 


sSTORE TIMEOUT VECTOR 
sPOINT NEW TO PROGRAM 
sAT PRIORITY 7 

;CLEAR Q22BE COUNTER 
sFIRST POSSIBLE ADDRESS 
sVECTOR FOR IT 

3TRyY THOSE VALUES 


sGET CSR FOR NEXT QOOKE 


SEQ 0415 


4 Oe 
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COKDAB.P LL O05 -APR 84 16:45 Q22BE SIZE ROUTINE SEQ 04146 
21580 1382526 0682708 000004 add 04,R5 ;GET vECTOR FOR NEXT ONE 
stack 1325382 005712 8$; rst (R2) sTRY TO ACCESS CSR 
21532 3 
gi338 3: IF NO TIMEOUT, STORE EXISTING ADDRESSES TO REGISTERS 

15 3 
21535 182534 005737 001160 TsT $TMPO sFIRST Q22BE FOUND? 
21536 132540 001010 BNE 4s sIF SECOND, BRANCH 
21537 132542 012705 002644 MOV @CSR1,R5 sSTART WITH CSR1 FOR 1ST 
21538 132546 010237 002662 MOV Re, SIMGOA sSIMUL TANEOUS GO 
21539 132552 062737 000016 002662 ADD 16, SIMGOA s ADDRESS 
21540 132560 000402 BR 53 sBRANCH TO INITIALISE 
21541 132562 012705 002664 4$: MOV eCSR12,R5 sSTART WITH CSR12 FOR OND 
21542 132566 012704 000004 S$: MOV 04 ,R4 sINITIALISE 5S REGISTERS 
21543 132572 010215 MOV R2,(R5) sINITIALISE CSR1 
21544 132574 011565 000002 6$: MOV CR5),20R5) sSTORE TO NEXT ONE 
21545 132600 005725 TST CRS )> sGET NEXT ADDRESS 
21546 132602 062715 0000C2 ADD @2,(R5) sGET ADDRESS, POINT NEXT 
21547 132606 077406 $08 R4 68 300 FOR NEXT 4 REGISTERS 
21548 132610 010365 000002 MOV R3,2(R5) ;STORE INTERRUPT VECTOR 
21549 132614 010365 000004 MOV R3,4(R5) ;AND PRIORITY 
21550 132620 062765 000002 000004 ADD @2,4(R5) 
21551 132626 005237 001160 INC $TMPO sCOUNT Q22BE'S 
21552 132632 022737 000002 001160 CMP @2,$TMPO 3; TWO FOUND? 
21553 132640 001406 BEQ 93 sIF SO, STOP SIZING 
stone 132642 000402 BR 83 sOTHERWISE, CONTINUE SIZING 

3 

Stas : ON TIMEOUT TRY TO LOOK AT NEXT ADDRESS RANGE 

1557 3 
215568 132644 005726 78: TST (SP )- sRESTORE STACK FROM 
21559 132646 005726 TST (SP )- ; TIMEQUT 
21560 132650 022702 170160 8%: cmp #170160,R2 sAT THE LAST POSSIBLE? 
21561 132654 001322 BNE es 3IF NOT, BRANCH 
21562 132656 005737 002644 9%: Tsf CSR1 31 FOUND? 
21563 132662 001402 BEQ 10% ;IF NONE, BRANCH 
21564 132664 104401 132676 TYPE » ONDQ22 ;TYPE FOUND 
21565 132670 010137 000004 10%: MOV R1,ERRVEC sMC STORE TIMEOUT VECTOR 
ctece 132674 00020” RTS PC sRETURN 


21568 132676 006412 031121 041062 ONOQ22: .ASCIZ <12><15>/Q22BE USED DURING TESTING/ 
21569 132704 020105 051525 042105 
21570 132712 042040 051125 047111 
21571 132720 020107 042524 052123 


‘ 


21573 .EVEN 

21574 .SBTTL Q22BE INTERRUPT INITIALISE ROUTINE 

21575 sTHIS ROUTINE WILt INITIALISE Q22BE TO INTERRUPT AT A PRIORITY AT (RO)- 

21576 sAT THE STARTING ADDRESS IN R3. THE TES] HAVE TO SET ACTUAL DONE BIT 

21577 38 CLEARING GO. 

21578 

21579 132732 005013 Q22INT: CLR (R3) ;CLEAR TRANSFER TYPE IN CSRI 
21580 132734 052710 000001 BIS OBITOO, (RO) 3ZERO DONE 

21581 132740 011063 000002 MOV (RO), 2(R3) 3SET PRIORIT: IN CSRO 
21582 132744 042710 000001 BIC OBITOO, (RO) ;PREPARE TO SET DONE 
ted, 132750 000207 RTS PC 


21585 -SBTTL DMATRN DATO CICLE THRU Q2?BE 


COKDAR 


PL 


133122 


133124 
133130 
133132 


133134 
133136 
133140 
133142 
133146 
133152 
133156 


012777 
005 700 


005 700 


012777 


012777 
012777 
105777 
100375 
000207 


011637 
104130 
000002 


010046 
010146 
010246 
012700 
004737 
004737 
004737 


001122 


177600 
133234 
133256 
133256 
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047674 


047654 


047642 
047640 
047634 
047622 


04 7606 


047570 
047570 
047556 


047544 


047544 
047532 


D1 
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DMATRN pato YCLE THRU Q2°BE 


1 THIS ROUTINE PERFORMS DATO FROM A LOCA'ION TEMP THRU THE FIRST 

sFOUND Q22BE STARTING AT LOCATION @CSR1. RO HAS O IF ONLY 1 TRANSFER IS 
3TO BE PERFORMED. OTHERWISE 16 BLOCK MODE TRANSFERS ARE TO Bt PERFORMED. 
sIN THE LATTER CASE ADDRESS AND WORD COUNT HAS TO BE LOADED BEFORE. 


DMATRN: MOV #12525, @DATA sDATA USED 
TST RO s00 1 WORD? 
BEQ i$ sIF YES, BRANCH 
MOV OBI TOS!BITOO,aCSR2 sBLOCK MODE, GO 
BR es s6RANCH TO 00 IT 
18: MOV #1601,@CSR1 ;RESET LATENCY COUNT DATO 
MOV @TEMP ,aBA sLOAD DMA ADDRESS 
MOV @177777,awc :00 1 WORD 
MOV eB 1T00,aCSR2 300 IT 
2s: TSTB acsRe2 sO0MA DONE? 
BPL 2s sWAIT TILL DONE 
3%: RTS PC sRETURN FROM SUBROUTINE 


.SBTTL OMARD DATI THRU Q22BE 
sTHIS ROUTINE PERFORMS DATI CYCLE THRU Q22BE IN EITHER BLOCK MODE OR A SINGLE 
s TRANSFER MODE. MEMORY LOCATION USED IS TEMP. RO IS ZERO FOR SINGLE TRANSFER 


DMARD: MOV @TEMP ,@BA sLOAD DMA ADDRESS 
TST RO 3:00 1 WORD? 
BEQ 1$ sIF YES, BRANCH 
MOV #1507,aCSR1 316 DATIB 
MOV @177770,awC :00 8 WORD 
MOV OBL TOSIBITOO,acsRe2 sBLOCK MODE GO 
BR es 3GO CHECK 
18: MOV #1407,aCSR1 sRESET LATENCY COUNT ,DATI 
sLOAD NEW DATA TO DATA R, 
MOV 0177777,awc :00 1 WORD 
MOV @BI TOO, aCSR2 300 IT 
2s: TSTB acsRe s0MA DONE ? 
BPL es sWAIT TILL DONE 
33: RTS PC sRETURN FROM SUBROUTINE 


TOUT: MOV (SP), $BDAOR sSTORE TRAPPED PC 
a *1350 sUNEXPECTED TRAP 


3 
sMMU GLOBAL SUBROUTINES 
: 


6 
sROUTINE TO INITIALIZE MEMORY MANAGEMENT 
é 


MMU: MOV RO, -(SP) sSAVE CONTENTS OF REGISTERS 
MOV R1, -(SP) : 
MOV R2, (SP) : 
JSR PC,POR sINIT [ AND D USER POR'S 
JSR PC,PAR sINIT I USER PAR'S 


JSR PC,PAR sINIT D USER PAR'S 


SEQ 0417 
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21042 
21643 


133162 


133232 


133234 
133236 
133242 
133246 
133252 
133254 


133376 
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005066 
013737 
013737 
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172516 


000200 
001600 


177600 


002776 000001 


177776 
177764 
000002 


177776 
000002 
177764 
000002 


000004 
177572 003004 
177574 003006 


05 APR 


= 


6:45 PAGE 419 


DMARD D DATI THRU Q2°BE 


#172200,RO0 
PC.POR 


027,80172516 
(SP)+,R2 
(SP)+.R1 
(SP)+,RO 

PC 


3 
sROUTINE TO INITIALIZE POR'S 


POR: 
POR1: 


R2 
077406,(RO)>+ 
@1,R2 

#16. ,R2 
POR1 


PC 


; 
sROUTINE TO INITIALIZE PAR‘S 


a 
PAR; 
PARI: 


R1 
R1,CRO)-> 
@200,R1 
#1600,R1 
PAR 


1 
@177600,(RO)- 
Pc 


; 
sTIME OUT ROUTINE 


3 
ADDTRP: 


INC 
RTI 


RS 


a 
;MMU TRAP ROUTINE 


8 
MMUTRP ; 


1$: 


FLAG, @1 

1s 

*2 

RO, -( SP) 
@0177776,R0 
@-14,R0 

RO, 92 

OK 


NO TOK 
@0177776,RO 


0177572, SAVMRO 
89177574, SAVMRL 


sINIT I AND D SUP POR'S 
sINIT I SUP PAR'S 

sINIT D SUP ans 

sINIT I AND DO KER POOR'S 
sINIT I KER PAR'S 

;INIT D KER PAR'S 
sINIT MMR3 
sRESTORE REGISTERS 
3 


° 
;RETURN 


s INIT CNTR 

; INIT POR 

s INCREMENT CNTR 
;ARE WE DONE? 
;BRANCH IF NOT 
;RETURN 


sSETUP TO INIT PAR 
sINIT PAR 

sGET READY FOR NEXT PAR 
sREACHED A PAR7 

sBRANCH IF NOT 

s INIT PAR? 

;RETURN 


s INCREMENT TIME OUT FLAG 
RE TURN 


sARE WE EXPECTING AN ABORT 
3YES GO ON 


;NO GO TO ERROR 


:SAVE CONTENTS OF REG O 
sSAVE A COPY OF PSw 
:LOOK AT BITS<15:14> 
sWAS PS<15:14>-10 

;NO GO ON 

sYES CHANGE BITS TO 00 
sSAVE A COPY OF PSw 
sLOOK AT BITS<13:12> 


é 

sWAS PS<13:12>=10 

sNO GO ON 

s;CLEAR ILLEGAL MODE FFROM OLO PSw 


sS4VE A COPY OF MMRO 
;SAVE A COPY OF MMR} 


SEQ 0418 


COKDABO KNU 
COKDAB .P 11 


21098 
21699 
21700 
ée1701 


21702 


133404 
133412 
133416 
133422 
133404 
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177576 003010 
177572 
002776 


OS - APR -84 
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HRU Q22BE 


80177576, SAVMR2 
80177572 

FLAG 

(SP )+,RO 


sSAVE A COPY OF MMRO 

sCLEAR ABORT BITS AND TURN MMU OF F 
sCLEAR MMU ABORT FLAG 

sRESTORE ORIGINAL CONTENTS OF REG 0 
sRE TURN 


SEQ 0419 
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21703 

21704 133426 012600 
21705 133430 012605 
21706 133432 1040038 
21707 133434 000110 
21708 

21709 

21710 

el71l 133436 000000 
21712 133440 000207 
21713 133442 000207 
21714 

21715 

ei7le 

2171” 

21718 

21719 

21720 

2172. 

21722 

21723 

21724 

21725 

21726 

21727 

21728 

21729 

21730 

21731 

21732 

21733 

21734 133444 010446 
21735 133446 010146 
21736 133450 012737 
21737 133456 000137 
21738 

21739 133462 010446 
21740 133464 010146 
21741 133466 012737 
21742 133474 005337 
21743 133500 001402 
21744 133502 022421 
21745 133504 001773 
21746 133506 012601 
21747 133510 012604 
21748 123512 000207 
21749 


003060 


G1 
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OMARD DATE THRU Q228E 


3FPP COMMON SUBROUTINES 


WLOTRP: MOV (SP)+,RO 
MOV (SP)+,R5 
ERROR +3 
JMP (RO) 
3 
3 
° 
TRPFLG: .WORD O 
ERRFP: RTS R7 
ERR: RTS R? 
a 
3 
Q 
5 
3 
;SUBROUTINE DATA VERFICATION - 
a 
:; CALLED BY JSR R7,DATVER 
; 
; INPUT: (R4)=*EXPECTED DATA 
3 (R1)=RECEIVED DATA 


i 
sTHIS ROUTINE VERIFIES THAT THE 4 CONSECTIVE WORDS STARTING WITH (R4&) ARE 
sEQUAL TO THE FOUR WORDS ADDRESSED BY (R1). 


sOISTURBED. 


sSAVE PC 


sSAVE STATUS AND RESTORE STACK 


sGO BACK INLINE 


sLOCATION “COUNT” , IF NOT EQUAL TO O SIGNIFIES DATA ERROR 


sIF THE STATUS IS FLOATING MODE, 
sARE SIMPL’ CHECKED FOR ZEROS 
; 


DATVFR: MOV R4, -(SP) 
MOV R1, -CSP) 
MOV #3, COUNT 
JMP DATL 

‘ 

DATVER: MOV R4,-(SP) 
MOV R1, -(SP) 
MOV @5,COUNT 

DATI: DEC COUNT 
BEQ es 
cmp (RO@)+ , CRI)> 
BEG DAT 

2s: MOV (SP )+,R1 
MOV (SP )+,R4 
R's R- 


THE LAST TwO BYTES OF RECEIEVED 


sSAVE R4 
sSAVE R1 
nag uP ITERATION COUNT 


s;SAVE R4 
sSAVE R1 
;SET UP ITERATION COUNT 


sBRANCH IF DONE 
; 


sRESTORE R1 
sRESTORE R4 
3GO BACK TO CALLING ROUTINE 
:IF DATA ERROR, COUNT NE 0 


THE CONTENTS OF R4, AND R1 ARE NOT 


SEQ 0420 
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217 

el*Si 
21752 
21753 
21754 
21755 
21756 
21°57 
21756 
21759 
21760 
21761 
21762 
21763 
21764 
21765 
21766 
21767 
21768 
21769 
21770 
21771 
21772 
21773 
21774 
21775 
21776 
21777 
21778 
21779 
21780 
21781 
21782 
21783 
21784 
21785 
21786 
21787 
21788 
21789 
21790 
21791 
21792 
21793 


133514 
133514 
133522 
133524 
133530 
133534 
133540 
133546 


000100 


001102 
001164 
001206 
100000 


133627 
001206 


133624 
000042 


377 
042412 
051501 


000052 


001206 


000 
042116 
020123 


-i | 
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DMARD DATT. THRU Gee 


-SBTTL END OF PASS ROUTINE 


FF SSSSSSHSSSSHESEHEESESSESSSESHESEEHEESEEEHESESHEEEEHEHEEEEHEEHESEEOEEEEES 
s¢INCREMENT THE PASS NUMBER ( $PASS) 

3*INDICATE END-OF -PROGRAM AFTER 1 PASSES THRU THE PROGRAM 

seTYPE “END PASS OXXXxxX" (WHERE XXxxx IS A DECIMAL NUMBER) 

;¢IF THERES A MONITOR GO TO IT 

3¢IF THERE ISN’ T JUMP TO LOOP 


SEOP: 
BIT *BIT06 ,ae52 
BNE $GET42 
CLR sTSTNM 3:;ZERO THE TEST NUMBER 
CLR STIMES 3:;ZERO THE NUMBER OF ITERATIONS 
INC $PASS 3; INCREMENT THE PASS NUMBER 
BIC #100000, $PASS 3;D0N'T ALLOW A NEG. NUMBER 
DEC (PC )e> 3 ;LO0P? 
SEOPCT: .wORD 1 
BGT $D0OAGN s3sYES 
MOV (PC )+,a(PC)- :sRESTORE COUNTER 
SENDCT: .WORD 1 
sEOPCT 
TYPE » SENOMG :3 TYPE "END PASS @” 
MOV sPASS, -( SP) 3:;SAVE $PASS FOR TYPEOUT 
TYPOS 3:GO TYPE--DECIMAL ASCII wITH SIGN 
TYPE . SENULL 33:TYPE A NULL CHARACTER 
$GET42: MOV @042 ,RO 3:GET MONITOR ADDRESS 
BEQ $OO0AGN ;;BRANCH IF NO MONITOR 
RESET 3;CLEAR THE WORLD 
SENDAD: JSR PC,.(RO) 3;GO TO MONITOR 
NOP 33SAVE ROOM 
NOP 33F OR 
NOP s3sACTLI1 
SDOAGN: 
JMP acPc)- 3 ;RETURN 
$RTNAD: .wORD LOOP 
SENULL: .BYTE -3,-3,0 ssNULL CHARACTER STRING 


SENOMG: .ASCIZ <15><i2>/END PASS 97 


-SBTTL SCOPE HANDLER ROUTINE 


FEOCOOSOOOECEEEEE EEE EEE ESEEOEEOEE OOOO EEEESEEAESEEEEEEEESEEEEEEEOE 
s@THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
3@AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (CDISPLAY<7:0>) 
3*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

s¢THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


3°SW14-1 LOOP ON TEST 

s¢SWll-l INHIBIT ITERATIONS 
3°SWO9=1 LOOP ON ERROR 

3°¢SWOS*1 LOOP ON TEST IN SWR<5:0> 
3 @CALt 

3° »COPE 33SCOPEt -I0T 


SEQ 0421 


« 
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21806 
21807 
21808 
21809 
21810 
2isil 
21812 
21813 
21814 
21815 
21816 
21817 
21818 
21819 
21820 
21821 
21822 
21823 
21824 
21825 
21826 
21827 


133644 
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104407 
032777 
OO1117 


0004 16 
013746 


032777 
001407 
017746 
042716 
122637 
001465 
105737 
001421 
123737 
101015 
032777 
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80( 1046 ) 


045216 


001103 
045152 
001106 


045120 


001104 


001104 
001164 


001204 


001115 
045020 


O05 -APR -84 
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SCOPE HANDLER ROUT INE 


$SCOPE : 
18: BIT 


sFOSGeSTART 
$XxTSTR: BR 


S$: CMP 


2s; TSTB 


7$: MOV 
4$: CLRB 


38: BIT 


18: MOV 
$SVLAD: 


SOVER: MOV 


SMXCNT: 1 
. SBTTL 


OBIT14,aSwR 
SOVER 


— FOR THE XOR 


@PERRVLC, -( SP) 
@5$,94 RRVEC 


(SP )+,(SP)- 
he QPERRVEC 


3;TEST FOR CHANGE IN SOFT-SwR 

3sLOOP ON PRESENT TEST? 

33VYES IF Swi4-1 

TESTERGO000 

33IF RUNNING ON THE “XOR” TESTER “HANGE 
s3THIS INSTRUCTION TO A “NOP” (NUP =240) 
33SAVE THE CONTENTS OF THE ERROR VECTOR 
33SET FOR TIMEOUT 

::TIME OUT ON XOR? 

s;RESTORE THE ERROR VECTOR 

3:GO TO THE NEXT TEST 

3:;CLEAR THE STACK AFTER A TIME OUT 
1a on THE ERROR VECTOR 


LOOP 
Cove FOR THE xOR’ TESTERO@OOO 


oe »9SWR 
@SWR, -( SP) 
@$SWRMK , (SP ) 
(SP )+,$TSTNM 
sOVER 

SERFLG 

3$ 


a SERFLG 
$ 

oBITO9, aSwWR 
4$ 


SLPERR, $.PADR 
sOVER 

SERFLG 

STIMES 


1$ 
OBIT11,aSwR 
1$ 


$STIMES,SICNT 
SOvER 
#1,SICNT 
SMXCNT, STIMES 
$TSTNM 
$TSTNM, STESTN 
(SP), $LPADR 
(SP), SLPERR 
SE SCAPE 

1, SERMAX 


$TSTNM,@OISPLAY 


$LPADR,( SP) 


ERROR HANDLER ROUTINE 


ON THE PRESENT TEST 
ssLOOP ON SPEC. 


TEST? 
3;BR IF NO 
33SET DESIRED TEST NUM. FROM SwR 
3;STRIP AWAY UNDESIRED BITS 
3:;ON THE RIGHT TEST? 
3;8R IF YES 
3;HAS AN ERROR OCCURRED? 
3;BR IF NO 
33MAx., ERRORS FOR THIS TEST OCCURRED? 
3;68R IF NO 
3;LO0P ON ERROR? 
33;BR IF NO 
3;SET LOOP ADDRESS TO LAST SCOPE 


3;ZERO THE ERROR FLAG 

3;CLEAR THE NUMBER OF ITERATIONS TO MAKE 
3;ESCAPE TO THE NEXT TEST 

s: INHIBIT ITERATIONS? 

33;8R IF YES 

s3IF FIRST PASS OF PROGRAM 

83 INHIBIT ITERATIONS 

:; INCREMENT ITERATION COUNT 

33;CHECK THE NUMBER OF ITERATIONS MADE 
33BR IF MORE ITERATION REQUIRED 
ssREINITIALIZE THE ITERATION COUNTER 
33SET NUMBER OF ITERATIONS TO 0O 
33;COUNT TEST NUMBERS 

3;SET TEST NUMBER IN APT MAILBOX 
3;SAVE SCOPE LOOP ADDRESS 

3;SAVE ERROR LOOP ADDRESS 

3sCLEAR THE ESCAPE FROM ERROR ADDRESS 
s;ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
ss;sDISPLAY TEST NUMBER 

:3FUOGE RETURN ADDRESS 

ssf IXES PS 

33MAX,. NUMBER OF ITERATIONS 


FF SHSSHSSHSSHSHHSHHHEHSHESESEHESEHEHHEHEEHESSEEHEEEHEEHEEEEEREEEEEEEHEEEEES 


s¢THIS ROUTINE WILL 


INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 


SEQ 0422 


COKDABO KDI11 B CLUSTER MACY11 30(1046) 05-APR-84 


COKDAB.P 11 


001402 
013716 


022737 
001001 
000000 


00C002 


05 -APR-84 16:45 


131740 
001175 


000001 


001114 
134532 


044634 


001000 


001110 
001166 


001166 
133610 


177520 
044750 
044740 


001116 
001114 
044700 


001220 
134274 


044620 


J] 
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ERROR HANOLER ROUT INE 


:*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
:*AND GO TO ERTYPE ON ERROR 
;*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


9%: 


7$:; 


1$: 


208: 


21s: 


223: 
2s: 


3$; 


4$; 


S$: 


63: 


HALT ON ERROR 


INHIBIT ERROR TYPEOUTS 


BELL ON ERROR 
LOOP ON ERROR 


oN 3 sERROR-EMT AND N=ERROR ITEM NUMBER 
VQUIET ss TEST FOR USER-QUIET MODE 
9s 3s;BRANCH IF FIELO-SERVICE MODE 


RO 
PC ABORT 


$TSTNM,@DISPLAY 


+ eee 
» SBELL 
SERTTL 
(SP), SERRPC 
@2, SERRPC 


@SERRPC, sITEMB 


©BIT13,8SWR 


20$ 
PC ,ERTYPE 
. SCRLF 


a 


$ 
S1TEMB,21$ 
PC, SATV4 
0 
i?) 
ees 


aSwR 
3$ 


#61 TO9, aSwR 
4$ 

$. PERR ,( SP) 
SE SCAPE 

5$ 
SESCAPE ,( SP) 


@SENDAD ,ae42 
os 


33IN CASE RO HAS A @3 IN IT (tC) 
s3TEST FOR ABORT CONDITION 


33TEST FOR CHANGE IN SOFT-SwR 
sENABLE HALT ON BREAK 

33SET THE ERROR FLAG 

3;00N’T LET THE FLAG GO TO ZERO 

:;DISPLAY TEST NUMBER AND ERROR FLAG 

;;BELL ON ERROR? 

33NO - SKIP 

::RING BELL 

;;COUNT THE NUMBER OF ERRORS 

;;GET ADDRESS OF ERROR INSTRUCTION 


33STRIP AND SAVE “— Pans ITEM CODE 
3:SKIP TYPEOUT IF SE 
33SKIP TYPEQUTS 


3:;GO TO USER ERROR ROUTINE 


: RUNNING IN APT MODE 

::NO,SKIP APT ERROR REPORT 

33;SET ITEM NUMBER AS ERROR NUMBER 
3 ;REPORT FATAL ERROR TO APT 


3;APT ERROR LOOP 

3;HALT ON ERROR 

33SKIP IF CONTINUE 

3:HALT ON ERROR! 

33TEST FOR CHANGE IN SOFT-SwR 
3;LOOP ON ERROR SWITCH SET? 
3;BR IF NO 

33FUDGE RETURN FOR LOOPING 
3;CHECK FOR AN ESCAPE ADDRESS 
33;BR IF NONE 

33FUDGE RETURN ADORESS FOR ESCAPE 


3sACT-11 AUTO-ACCEPT? 
3;BRANCH IF NO 
s3tES 


3 sRE TURN 


SEQ 0423 


kooes 9 KDJ11 6 CLUSTER 
Pll 05 - APR 84 


COKDAB 


21918 
21919 
21920 
21921 
21922 
21923 
21924 
21925 
21926 
21927 
21928 
219<9 
21930 


005737 
001454 
020027 
001443 
020027 
001404 
005737 
001443 


000422 


013737 
013737 


112737 
112737 
00040? 
112737 


010046 
010146 
105737 
001450 
122737 
001031 
132737 
001425 
017600 


MACYLIL 
16:45 


000032 


004052 
004054 


000057 
000136 
000103 


004052 
004054 


177777 
000042 


000042 
133610 


000100 


30( 1046) 


000030 
0000 5? 


177777 


134760 
134756 


134760 


001220 
001221 


O05 -APR 84 


. SBITL 


ABORT: 


ABORTC: 


ABORTE : 


ABORTZ: 


NOABRT : 


IK] 
16:45 PAGE 425 
ERROR HANDLER ROUTINE 


ABORT ROUTINE “OR LCP/ORION UFD MODE 


Ts? 


JMP 
RTS 


+42 
#@-1,42(RO) 
8042 ,R0 
ae4e2 
$ENDAD 

PC 


s TEST FOR USER PS 
sIF NOT UFD THEN’ CONTINUE NORMAL OPERATION 


31S IT A tZ ? 

;JUST GO Back TO CHAIN IF Ii IS (NO ERROR) 

31S IS A tC ? 

;68R TO LOAD tc ON XxXDP+ STACK (NO ERROR) 

; TEST FOR USER-QUIET MODE 

sIF FIELO-SERVICE MODE, CONTINUE NORMAL OPERATIUN 


; BECAUSE FIELD-SERVICE MODE DOES NOT GUIT ON ERROR 
;SET ORSERR THEN LEAVE 


sRESTORE EMT LOCATION (30) 

sRESTORE EMT PRIORITY LOCATION (32) 

3GET XxXDP STACK LOC. INTO RO FROM MONITOR 
sF IND END OF STACK 


sLOAD SLASH OVER ZERO 
RROW 


c 
sMAKE NEW END TO STACK 
sNOW LEAVE 
sRESTORE EMT LOCATION (30) 
sRESTORE EMT PRIORITY LOCATION (32) 
;GET OCA LOCATION INTO RO FROM MONITOR 
3SET A -1 INTO LOCATION ORSERR IN MONITOR 
sAND PUT THE MONITOR RETURN ADDRESS IN RO 
sCLEAR MONITOR RETURN FLAG 
sRETURN TO MONITOR-DO NOT PUSH STACK HERE 
3IF NOTUFD RETURN TO MAINLINE 


-SBTTL APT COMMUNICATIONS ROUTINE 


FF SSSHSHHSSSSHSHSSSHSSSHSSESHSESESSHESEHEEESESESHEHEEEEHEEHESEEEHESESEEEEEES 


SATYlL: 
SATY3: 


SATY4: 
SATYC: 


MOVB 


1,$8FFLG 
o1,SMFLG 
SATYC 

o1,SFFLG 


OAPTENV, 


$ 
@APTSPOOL , 
3$ 
@4( SP) ,RO 


SENV 
sENVM 


33TO REPORT FATAL ERROR 
33;TO TYPE A MESSAGE 


33TO ONLY REPORT FATAL ERROR 


33PUSH RO ON STACK 
33PUSH R1 ON STACK 
3:SHOULD TYPE A MESSAGE? 
33IF NOT: 6R 

3 ;OPERATING UNDER APT? 
33IF NOT: BR 

33;SHOULD SPOOL MESSAGES? 
s3IF NOT: BR 

33GET MESSAGE ADDR, 


SF 


rc 
4 


0424 


COKDABO KDJ11 B CLUSTER 
COKDAB.P11 O05 - APR - 84 


062 766 
005737 
001375 
010037 


MACYI11 
16:45 


000002 
001200 


001214 


001214 
001216 
000004 


30( 1046) 


000004 


001200 
134670 
000004 


001202 
000004 


L 1 
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APT COMMUNICATIONS ROUTINE 


ADD @2,4(SP) ::;BUMP RETURN ADDR. 
1%: TsT SMSGT YPE :;SEE IF DONE W/ LAST XMISSION? 
BNE 1$ s3IF NOT: WAIT 
MOV RO, $MSGAD 33;PUT ADDR IN MAILBOX 
2s: Lia aes 33F IND END OF MESSAGE 
$ 
SuB $MSGAD ,RO 33SUB START OF MESSAGE 
ASR RO 33:GET MESSAGE LNGTH IN WORDS 
MOV RO, $SMSGLGT ;;PUT LENGTH IN MAILBOX 
~ > mame ;;TELL APT TO TAKE MSG. 
$ 
3$: MOV @4(SP),4$ 3;PUT MSG ADOR IN JSR LINKAGE 
ADD #2,4(SP) 3;BUMP RETURN ADDRESS 
MOV 177776, -( SP) 33;PUSH 177776 ON STACK 
JSR PC, $TYPE ::CALL TYPE MACRO 
+4 -WwORDB O 
10$: TSTB8 sFFLG 3:SHOULD REPORT FATAL ERROR? 
BEQ 12s :3:IF NOT: BR 
TsT sENV 3 ;RUNNING UNDER APT? 
BEQ 12$ 33:IF NOT: BR 
118: TST SMSGTYPE 33F INISHED LAST MESSAGE? 
BNE 11% 33:IF NOT: WAIT 
MOV @4( SP), SFATAL 3;GET ERROR @ 
ADD €2,4(SP) ; ;BUMP RETURN ADDR. 
INC $MSGT YPE :;TELL APT TO TAKE ERROR 
12$: CLRB sFFLG ;;CLEAR FATAL FLAG 
CLRB $LFLG ;;CLEAR LOG FLAG 
CLRB $MFLG 3:CLEAR MESSAGE FLAG 
MOV (SP)+,R1 ;3;POP STACK INTO R1 
MOV (SP )+,RO :;P0P STACK INTO RO 
RTS PC 3; sRETURN 
SMFLG: .BYTE ce) 3:MESSG. FLAG 
SLFLG: .BYTE 9) ;;LOG FLAG 
sFFLG: BYTE 0 z3FATAL FLAG 
EVEN 
APTSIZE=200 
APTENV=001 : 
APTSPOOL =100 a 
APTCSUP =040 ’ 


.SBTTL TYPE ROUTINE 


f PPPOE EEEEEEEEEE EES OEEEEEESEEOSESERESESEOEAEEEEEEESEEEEEEEEEEEE 
;@ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
;¢THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 


;*NOTEL: S$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
3;*NOTE2: $F ILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
;*NOTES: sFILLC CONTAINS . THE CHARACTER TO FILL AFTER. 

3¢ 

3*CALL: ? 

341) USING A TRAP INSTRUCTION 

a TYPE »MESADR 3;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 

3° 

3° TYPE 

3° ME SADR 


SEQ 0425 


COKDABO KDJ11-8 wr te 
COKDAB.P11 -84 


134762 
134766 
134770 


135122 
135124 


135130 
135134 
135136 
135142 
135146 


135150 
135154 
135160 
135166 
135170 
135172 
135174 
135174 
135200 
135202 
135206 
135212 


05 - APR 


013746 


105366 
002770 
004737 
105337 
000770 


112716 


105777 
100022 
017746 
042716 
122716 


MACY11 30( 1046) 
16:45 


001157 


135312 


135174 
001156 


001154 
000001 


135174 
135312 


000040 
135174 
000007 


043744 


043740 
177600 
000023 


001220 
00l2e1 


001221 


135312 


O05 -APR -84 


TYPE ROUTINE 


sTYPE: 


1$: 


615: 
6258: 


2s: 
60$: 
3$: 
4$: 


5$: 
6$: 


7$;: 


sMORIZONTAL TAB 


8s: 
9%: 


sTYPEC: 


TSTB 


ML 


16:45 PAGE 427 


OAPTENY, SENV 
62% 


@APTSPOUL , SENVM 


62$ 
RO,61$ 
PC, $ATY3 


.°) 
@APTCSUP , SENVM 
60 


. -(SP) 


PC, STYPEC 
sFILLC.CSP)- 


2s 

SNULL, -( SP) 
1(SP) 

6$ 

PC, STYPEC 
SCHARCNT 

7$ 
PROCESSOR 

@ ,(SP) 
PC, STYPEC 
27, SCHARCNT 
9s 


(SP). 
es 


asTKs 


::I1S THERE A TERMINAL? 

;;68R IF YES 

:;HALT HERE IF NO TERMINAL 

3 sLEAVE 

3:SAVE RO 

33;GET ADDRESS OF ASCIZ STRING 
:3RUNNING IN APT MODE 

3:NO.GO CHECK FOR APT CONSOLE 
+:SPOOL MESSAGE TO APT 

3:NO,GO CHECK FOR CONSOLE 
3;SETUP MESSAGE ADDRESS FOR APT 
3:SPOOL MESSAGE TO APT 
3:MESSAGE ADDRESS 

3;APT CONSOLE SUPPRESSED 
:3:YES,SKIP TYPE OuT 

3:PUSH CHARACTER TO BE TYPED ONTO STACK 
;;BR IF IT ISN’ T THE TERMINATOR 
::IF TERMINATOR POP IT OFF THE STACK « 
7 sRESTORE RO 

3:;ADJUST RETURN PC 

3; ;RETURN 

;;BRANCH IF <HT> 


7 ;BRANCH IF NOT <CRLF> 


33;POP <CR><LF> EQUIV 
33:TYPE A CR AND LF 


2;CLEAR CHARACTER COUNT 
3;GET NEXT CHARACTER 
33;GO TYPE THIS CHARACTER 
33IS IT TIME FOR FILLER CHARS. ? 
33;If NO GO GET NEXT CHAR. 
3:GET @ OF FILLER CHARS. NEEDED 
33AND THE NULL CHAR. 
33;00ES A i NEED TO BE TYPED? 
-GO te THE NULL OFF OF STACK 


3,00 NOT COUNT AS a COUNT 
; 3. 00° 


;;REPLACE TAB WITH SPACE 
2: TYPE A SPACE 

;:;BRANCH IF NOT AT 

3;TAB STOP 

33;POP SPACE OFF STACK 
3;:GET NEXT CRARACTER 


s:Ue. — IN *Y8D BUFFER? s*@u0001 
ssBR TF NOT iM IDO t 
33GET CRAR s@D001 
s3STRIP EXTRANEOUS BITS s™J000 1 


33WAS CRAR «orf s™@U0001 


SEQ 0426 


COKDABO KDJ11-8 CLUSTER ped 30( 1046) R- App a4 


Nl 
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7:68 IF wor 
s7WALT FOR CHAR 


+ :GET Crean 
s STRIP IF 
ssWAS IT KON? 
3:08 IF wor 


sof Im STACK 
asWATT UNTIL PRINTER IS READ 


s;LOAD CHAR TO GE *YPED ~—_ Oata BEC 
a3ftS a & CARRIAGE OE) Em? 


3: BRaCH IF 
rE - ety: CHARACTER COunT 
rei 2 
31S ag g A A LINE FEED? 
7 ;@RancH IF 
: COUNT ve CoARAC TER 
ssCARACTER COUNT STORMS 


seTHIS ROUTINE IS USED TO CHANGE A 16-61! BINAMY tOPBER 'O 4 © DIGI" 


TYPE OuT wlt= Tee Sard Papas fas 46 


ssPBER 10 GE TYPED 
ssCML FOR TrPEOUT 
soN*l TO 6 ©OR wewBEer O OIGCITS 
ssl RO 
sal*TPE LEADING FEROS 
3 sO*SUPPRESS LEADING FEROS 


i 


TO "3. 


Las" 


ssWPBER 10 BE T1PED 
s:CAL FUR TPEQUT 


TYPE.” OF A 16 BIT mewee 


ssNMUPBER TO BE [PED 
s:CM&L FOR TrPEQUT 


ssPICee THE MODE 

33.080 ZERO Ft SeI'Ce 
ssMUPBER OF DIGITS "O "8 
QE TURN ADORE». 


ZE@O FTL Selon 


3s4D0s! 
sit? t< 


COKDAB.P11 OS -APR-84 16:4 UTINE 

22086 155216 001012 BNE 1028 

22087 135220 1018: 

22088 135220 105777 043720 TS'8 astKs 

22089 135224 100375 BPL 1018 

22090 135226 117716 043714 Ove @sTxB.( SP) 
22091 135232 042716 177600 BIC #177600,( SP) 
22092 135236 122716 000021 chs @$0N,( SP) 
22093 135242 001366 BNE 1018 

22094 135244 10238: 

22095 135244 005726 Ts? (SP). 

22096 135246 108: 

22097 135246 105777 043676 TS'8 asTPs 
22098 135252 100375 BPL os 

22099 135254 116677 000002 043670 Ove 20S). as Tre 
22100 135262 122766 000015 000002 chPS eC ) 
22101 135270 001003 BNE is 

22102 135272 105037 135312 CLRB SCHARCNT 
22103 135276 000406 BR sTYPEx 
22104 135300 122766 000012 000002 15: ChPB oF .20SP) 
22105 135306 001402 BEG sTyYPEr 
22106 135310 105227 INCB (PC )- 

22107 135312 SCHARCNT: .wORD 0 

tees 135314 000207 STYPEx: RTS PC 

22110 -SBTTL BINARY TO OCTM (ASCII) AO TYPE 
22111 

22112 

22113 

22114 s@OCTAL (ASCII) NUMBER AND TYPE IT. 
22115 ;esTrPOS. 

22116 3;eCALL: 

22117 3¢ "0v wr, (SP) 
22118 3e TYPOS 

22119 ;0 .BYTe WN 

22120 3° .Or'e 

22121 3° 

22122 3° 

22123 3° 

22124 ;eSTYPON.-. -ENTER ~€RE 70 
22125 s@STYPOS OR ST YPOC 

22126 seCALL: 

22127 3° "Ov wre, (SR) 
22128 ie TYPON 

22129 ie 

22130 ;eSTYPOC-.--ENTER -€RE FOR 
22131 seCALL: 

22132 :° Ov wrt, SP) 
22133 7 TOC 

22134 

22135 135316 017646 000000 TYPOS: ™Ov aS), (2) 
22136 135322 116637 000001 135541 *Ov8 1H), 8OF Tin 
22137 135330 112637 135543 Ove ( SP )+, SOMODE-1 
22138 135334 062716 000002 aD0 2.02%) 
22139 135340 000406 Ba 87 PO, 
22140 135342 112737 000001 135541 $1rPOC: MOvB 71, 80F IL) 
22141 135350 112737 000006 135548 *Ov8 a , SOMODE - | 


siot * ©OB Stace) OFGITS 


“ENTER HERE TO SETL® SUPPRESS ZEROS AAD WIPER OF NIGCITS 'O "Pt 


OQ 04627 


Be 


koopen KDJ11-8 CLUSTER MACY11 30(1046) 0O5-APR-84 16:45 PAGE 4 

COKDAB.P 11 OS-APR-84 16:45 BINARY io. OCTAL CASCIT) AND TYPE SEQ 0428 
22142 135356 112737 000005 135540 $TYPON: MOVB 05, 80CNT ssSET THE ITERATION COUNT 

22143 135364 010346 MOV R3,-(SP) ssSAVE RS 

22144 135366 010446 MOV R4,-(SP) ssSAVE R4 

22145 135370 010546 MOV RS, -(SP) ssSAVE RS 

22146 135372 113704 135543 MOvB SOMODE +1,R4 ssGET THE NUMBER OF DIGITS TO TrPE 
22147 135376 005404 NEG R4 

22148 135400 062704 000006 ADD 06 ,R4 ssSUBTRACT IT FOR MAX, ALLOWED 
22149 135404 110437 135542 MOVB R4, SOMODE ssSAVE IT FOR USE 

22150 135410 113704 135541 MOVB SOF ILL ,R4 3sGET THE ZERO FILL .SWITCH 

22151 135414 016605 000012 MOV 12(SP),R5S 1sPICKUP THE INPUT NUMBER 

22152 135420 005003 CLR R3 +sCLEAR THE OUTPUT WORD 

22153 135422 006105 18; ROL RS ssROTATE MSB INTO “C” 

22154 135424 000404 BR 3% 3350 DO MSB 

22155 135426 006105 2s: ROL RS 33FORM THIS DIGIT 

22156 135430 006105 ROL RS 

22157 135432 006105 ROL RS 

22158 135434 010503 MOV RS5,R3 

22159 135436 006103 38: ROL R3 33GET LSB OF THIS DIGIT 

22160 135440 105337 135542 OECB $OMODE ss TYPE THIS DIGIT? 

22161 135444 100016 BPL 7$ 336R IF NO 

22162 135446 042703 177770 BIC @177770,R3 33GET RIO OF JUNK 

22163 135452 001002 BNE 43 ssTEST FOR O 

22164 135454 005704 TST Ra 3sSUPPRESS THIS 0? 

22165 135456 001403 BEQ 5$ 336R IF VES 

22166 135460 4$; INC R4 33;00N'T SUPPRESS ANYMORE 0'S 

22167 135462 052703 000060 BIS ©'O,R3 +sMAXE THIS DIGIT ASCII 

22168 135466 052703 000040 58; BIS o RS ssMAKE ASCII IF NOT ALREADY 

22169 135472 110337 135536 MOVB R3,8$ ssSAVE FOR TYPING 

22170 135476 104401 135536 TYPE 8s 33GO TYPE THIS DIGIT 

22171 135502 105337 135540 78: OECB sOCNT :3COUNT BY 1 

22172 135506 003347 BGT es 338R IF MORE TO DO 

22173 135510 002402 BLT 6$ 33BR IF DONE 

22174 135512 005204 INC Ra ssINSURE LAST DIGIT ISN'T A BLANK 
22175 135514 000744 BR 2s 33GO OO THE LAST DIGIT 

22176 135516 012605 63: MOV (SP)+,R5 ssRESTORE RS 

22177 135520 012604 MOV (SP )+,R4 ssRESTORE R4 

22178 135522 012603 MOV (SP )+,R3 ssRESTORE RS 

22179 135524 016666 000002 000004 MOV 2(SP),4(SP) 33SET THE STACK FOR RETURNING 

22180 135532 012616 MOV (SP )+,(SP) 

22181 135534 000002 RTI 3 sRETURN 

22182 135536 000 83: BYTE O ssSTORAGE FOR ASCII OIGIT 

22183 135537 000 BYTE O ss TERMINATOR FOR TYPE ROUTINE 

22184 135540 000 sOCNT: BYTE O ssOCTAL DIGIT COUNTER 

22185 135541 000 SOFILL: .BYTE : ee FILL SWITCH 

22186 135542 000000 SOMODE: .WORD sNUMBER OF DIGITS TO TYPE 

te .SBTTL CONVERT BINARY TO DECIMAL ANDO TYPE ROUTINE 

22189 PwC TIS IVI IIIT ITI iv iii iiiiiriviriiirititiirririiiiitirtii itt 
22190 s¢THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
22191 s*SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
22192 s*NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
22193 s*¢BEFORE THE FIRST DIGIT OF THE NUMBER, LEADING ZEROS WILL ALWAYS BE 
22194 s*REPLACED WITH SPACES. 

22195 s@CALL: 

22196 3° MOV NUM, -( SP) 33PUT THE BINARY NUMBER ON THE STACK 
22197 i) TrPDS 33GO TO Teté ROUTINE 


or 


Le 


P 430 
DECIMAL AND TYPE ROUTINE 


OKDABO KDJ11 B CLUSTER MACY11 30(1046) 05 APR-84 Jo:45 AGE 
OKDAB.P 11 O05 -APR 84 16:45 CONVERT BINARY TO 
22198 
22199 135544 $TYPDS; 
22200 135544 010046 MOV RO, -( SP) 
2201 135546 010146 MOV R1, -(SP) 
22202 135550 010246 MOV R2, -(SP) 
22203 135552 010346 MOV R3,-(SP) 
2204 135554 010546 MOV RS, -(SP) 
22205 135556 012746 020200 MOV #20200, -( SP) 
22206 135562 016605 000020 MOV 20(SP),RS 
22207 135566 1 BPL i$ 
22208 135570 005405 NEG RS 
22209 135572 112766 000055 000001 MOVB @' -,10SP) 
22210 135600 00 1$; CLR 
222ll 135602 012703 135760 MOV ©sOBLK ,R3 
222l2 135606 112723 000040 MOVB @' ,CR3)- 
22213 135612 005002 2s: CLR 
22214 135614 016001 135750 MOV sDOTBL(RO),R1 
222i5 135620 160105 3%: SUB R1,R5S 
22216 135622 002402 BLT 43 
22217 135624 005202 INC R2 
22218 135626 000774 BR 3$ 
22219 135630 060105 4$; AOD R1.RS 
22220 135632 005702 TST R2 
22221 135634 001002 BNE S$ 
22222 135636 105716 TSTB (SP) 
22223 135640 100407 BMI 7$ 
22224 135642 106316 S$: ASLB (SP) 
22225 135644 103003 BCC $ 
22220 135646 116663 000001 177777 MOVB 1(SP),-1¢R3) 
22227 135654 052702 000060 63%: BIS Re 
22228 135660 052702 000040 7$: BIS @ ,R2 
22229 135664 110223 MOVB R2,(R3)> 
22230 135666 720 TST (RO)> 
22231 135670 020027 000010 CMP RO,@10 
22232 135674 002746 BLT es 
22233 135676 003002 6GT 8s 
22234 135700 010502 MOV RS ,R2 
22235 135702 000764 BR 68 
2236 135704 105726 83; TSTB (SP )- 
22237 135706 100003 BPL 93 
22238 135710 116663 177777 177776 MOVB -10SP), -2(R3) 
22239 135716 105013 93; CLRB (R3) 
22240 135720 012605 MOV (SP )+,R5 
22241 135722 012603 MOV (SP )+,R3 
22242 135724 012602 MOV (SP )+,R2 
22243 135726 012601 MOV (SP )+,R1 
22244 135730 012600 MOV (SP )+,RO 
22245 135732 104401 i35760 TrPE . SOBLK 
22246 135736 016666 000002 000004 MOV 2(5P),4(SP) 
22247 135744 012616 MOV (SP )+,¢SP) 
22248 135746 RTI 
22249 135750 023420 SOTBL: 10000, 
22250 135752 001750 1000, 
22251 135754 000144 100. 
22252 135756 000012 10. 
22253 135760 000004 SDOBL‘; ,BlKW 4 


+sPUSH RO ON STACK 
+3PUSH R1 ON STACK 
3sPUSH R2 ON STACK 
3sPUSH R3 ON STACK 


+sPUSH RS ON STACK 

33SET BLANK SWITCH AND SIGN 
33GET THE INPUT NUMBER 

:;BR IF INPUT IS POS. 

:3:MAKE THE BINARY NUMBER PCS. 
33MAKE THE ASCII NUMBER NEG. 
33ZERO THE CONSTANTS INDEX 
33sSETUP THE OUTPUT POINTER 
33SET THE FIRST CHARACTER TO A BLANK 
::;CLEAR THE BCD NUMBER 

33GET THE CONSTANT 

33FORM THIS BCO DIGIT 

338R IF DONE 

ss INCREASE THE BCD DIGIT BY 1 


3:ADD BACK THE CONSTANT 
3;CHECK IF BCD DIGIT=0 
33F ALL THROUGH IF O 
33STILL DOING LEADING 00'S? 
3;68R IF YES 
33MSO0? 
33;368R IF NO 
33YES--SET THE SIGN 
3sMAKE THE BCD DIGIT ASCII 
33sMAKE IT A SPACE IF NOT ALREADY A DIGIT 
33sPUT THIS CHARACTER IN THE OUTPUT BUFFER 
3sJUST INCREMENTING 
33;CHECK THE TABLE INDEX 
33GO DO THE NEXT OIGIT 
33GO TO EXIT 
33:GET THE LSD 
33GO CHANGE TO ASCII 
33WAS THE LSD THE FIRST NON-ZERO? 
3:68R IF NO 
33YES--SET THE SIGN FOR TYPING 
33SET THE TERMINATOR 
33POP STACK INTO RS 
33POP STACK INTO R3 
33POP STACK INTO R2 
33:POP STACK INTO Rit 
e+ STACK INTO RO 
sNOW TYPE THE NUMBER 
; :ADJUST THE STACK 


ssRETURN TO USER 


SEQ 0429 


COKDABO KDILI os ae 39 eed 30( 1046) 


COKDAB. 


Pll 


135770 
135776 


022737 
001074 
105777 
100071 
117746 
042716 
022726 
001062 
123727 
001456 


104401 
104401 
013746 
104402 
104401 
005046 
005046 
105777 
100375 


117746 
042716 


021627 


021627 


000176 
043140 
043134 
177600 
000007 
001134 
136525 
136532 
000176 


136543 
043056 


043052 
177600 


000025 
136520 
000006 


000015 
000004 
000002 


000006 
001175 
001135 


000100 


135174 
000060 


001140 


000001 


042776 


000001 
042754 


05 -APR -84 
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- SBITL 


. ENABL 


De 


Git PAGE 431 


TTY INPUT ROUTINE 


FFFOHSHHHHSHSSHEHESSEEHEHESEHEHESEEHESEEEAEEEEEEEEEEHECHEEEHEEEEEHS 


LSB 


PPP PO rrrrrrrrrrrririiiiiiiiiiiitiiiiiriiiti tii titi it 
s*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 

s*ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 

s*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
3;@¢WHEN OPERATING IN TTY FLAG MODE. 


sCKSWR: 


T 
$GTSWR: 


19$: 
7$: 


93: 


208: 


CMP 


@SWREG , SWR 


» SCNTLG 
» SMSWR 
SWREG, -( SP) 


» SMNEW 
-(SP) 

-(SP) 

asTKS 

7$ 


asTKB, -(SP) 
#*C177,(SP) 


(SP),@25 


+ a ceaas 
ars) 


3(SP),asuR 
06, SP 

» $CRLF 
SINTAG, 41 
158 
0100,asTKS 


PC, STYPEC 
(SP), #60 


33:1S THE SOFT-SWR SELECTED? 
3:;B8RANCH IF NO 

33CHAR THERE? 

s3IF NO, DON’T WAIT AROUND 
33SAVE THE CHAR 

33STRIP-OFF THE ASCII 

33IS IT A CONTROL G? 

33NO, RETURN TO USER 

:sARE WE RUNNING IN AUTO -MODE? 
3;BRANCH IF YES 


s3sECHO THE CONTROL -G ( tG) 

ss TYPE CURRENT CONTENTS 

ssSAVE SWREG FOR TYPEOUT 

3:GO TYPE--OCTAL ASCIICALL DIGITS) 
3;PROMPT FOR NEW SwWR 

+;CLEAR COUNTER 

33 THE NEW SwWR 

33CHAR THERE? 

33IF NOT TRY AGAIN 


33sPICK UP CHAR 
ssMAKE IT 7-BIT ASCII 


33IS IT A CONTROL -U? 
s3;BRANCH IF NOT 

33YES, ECHO CONTROL -U (tU) 
3s; IGNORE PREVIOUS INPUT 
3:LET’'S TRY IT AGAIN 


33IS IT A <CR>? 

3:BRANCH IF NO 

33VYES, IS IT THE FIRST CHAR? 
:3BRANCH IF YES 

33SAVE NEW SWR 

33;CLEAR UP STACK 

33sECHO <CR> AND <LF> 
33;RE-ENABLE TTY KBD INTERRUPTS? 
3;BRANCH IF NOT 

33;RE-ENABLE TTY KBD INTERRUPTS 
3 sRETURN 

33ECHO CHAR 

s3CHAR « 0? 


SEQ 04320 


COKDABO KDJ11 B CLUSTER 


COKDAB.P 11 


22310 
22311 
22312 
22313 
22314 
22315 
22316 
22317 
22318 
22319 
22320 
22321 
22322 
22323 
22324 
22325 
22326 
22327 
22328 


134402 


05 - APR -84 
002420 


021627 
003015 


010346 


MACY11 350( 1046) 


16:45 


000067 


000060 
000002 


000002 
177776 
001174 


000023 


{- o 


OS-APR-84 16:45 PAGE 432 
TTy INPUT ROUTINE 
BLT 18$ 
CMP (SP), 067 
BGT 8$ 
BIC 060,( SP) 
TST 2(SP) 
BEQ 17$ 
ASL (SP) 
ASL (SP) 
ASL (SP) 
17$: INC 2( SP) 
BIS -2(SP),(SP) 
BR 7$ 
18$; TYPE . SQUES 
BR 20$ 
-OSABL LSB 


:;BRANCH IF YES 

3s3CHAR > 7? 

3sBRANCH IF YES 
s3STRIP-OFF ASCIT 

33IS THIS THE FIRST CHAR 
3:;BRANCH IF YES 

33NO, SHIFT PRESENT 

33 CHAR OVER TO MAKE 
83 ROOM FOR NEW ONE. 
:3KEEP COUNT OF CHAR 
3;SET IN NEW CHAR 
33GET THE NEXT ONE 

s3 TYPE ?<CR><LF> 
ssSIMULATE CONTROL -U 


FE FSSSANAHSSHASSHASSHESEHESHEEEHEEEEAEEEHEEHEEEHESEHESESEHAEEHEAEEEKEHEEOEEEEE 


3*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


:@CALL: 

36 ROCHR 

34 RETURN HERE 

3¢ 

a 

$ROCHR: MOV (SP), -(SP) 

Vv 4(SP),2(SP) 

1$: TSTB asTKS 
BPL 1$ 
MOvVB asTKB,4(SP) 
BIC @tC<177>,4(SP) 
CMP 4(SP),023 
BNE 33 

2s: TST8 asTKsS 
BPL 2s 
MOVB asTKB, -(SP) 
BIC #*C177,(SP) 
CMP (SP)+,@21 
BNE 2s 
BR 1$ 

3$: CMP 4(SP),@$X0N 
BEQ 1$ 
CMP 4(SP),#140 
BLT 4$ 
CMP 4(SP),0175 
BGT 4s 
BIC 940,4(SP) 

43%: RTI 


33: INPUT A SINGLE CHARACTER FROM THE TTY 
3 ;CHARACTER IS ON THE STACK 
;:WITH PARITY BIT STRIPPED OFF 


3:PUSH DOWN THE PC 
33SAVE THE PS 

33;WAIT FOR 

33A CHARACTER 

33:READ THE TTY 

33GET RIO OF JUNK IF ANY 
331S IT A CONTROL -S? 

3 ;BRANCH IF NO 

33WALT FOR A CHARACTER 
3;LOOP UNTIL ITS THERE 
33GET CHARACTER 

s3sMAKE IT 7-BIT ASCII 
33:13 IT A CONTROL -Q? 
33IF NOT DISCARD IT 
33YES, RESUME 

:3I1S IT A RANDOM XON? 
3: s;BRANCH IF YES 

::IS IT UPPER CASE? 
:;BRANCH IF YES 

33IS IT A SPECIAL CHAR? 
33BRANCH IF YES 

33sMAKE IT UPPER CASE 
3:GO BACK TO USER 


3RANOOL 
sRANOOL 


FEFSSSSSHSHASHSHSHSSHESHESHSEHSHESHASHEESEHESEHEEESHEEESEHEEESSSHEEEHEHEHEEHEEOE 


s@THIS ROUTINE WILL INPUT A STRING FROM THE TTY 


s@CALL: 

3¢ ROLIN 

34 RETURN HERE 

3° 

SRDOLIN: MOV R3,-(SP) 


ss INPUT A STRING FROM THE ITTY 
ssADORESS OF FIRST CHARACTER WILL BE ON THE STACK 
3: TERMINATOR WILL BE A BYTE OF ALL OS 


33;SAVE R3 


SEQ 0431 


COKDABO KNJ11-8 wr ey sad 30( 1046) 


COKDAB.P11 OS-A 


22366 
22367 
22368 
22369 
22370 
22371 
22372 


84 1 


012703 
022703 
101405 


136510 
136520 


177777 
001176 


000004 
136510 


000004 


000002 


000 
000012 
020122 


053505 


000002 


OS - APR -84 


F2 
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TTY INPUT ROUTINE 


1$: 
2s: 


~ O$;: 


$TTYIN: 
SCNTLU: 
SCNTLG: 
SMSWR ; 
SMNEW: 


:@CALL: 


1$: 


2s: 


@s$TTYIN,RS 
* al tins 


CSP)+,CR3) 
oe 


oo 
(R3), 9$ 
98 
815,(R3)> 
es 


OsTTYIN, 4(SP) 


0 

te) 

8. 

4*U/<15><12> 
/tG/<15><12> 
<15><12>/SWR = / 


/ NEW = / 


33GET ADDRESS 
3; ;BUFFER FULL? 
3;B8R IF YES 
33GO READ ONE 2 pentane FROM THE TTY 
1 IGET CHARACTE 
33IS ITA RuBOUT 
33SKIP IF NOT 
ssTYPE A ‘?' 
3;CLEAR THE BUFFER AND LOOP 
::ECHO THE CHARACTER 


3;CHECK FOR RETURN 

:3;LOOP IF NOT RETURN 

3;CLEAR RETURN (THE 15) 

33TYPE A LINE FEED 

ssRESTORE R3 

ssADJUST THE STACK AND PUT ADDRESS OF THE 
33 FIRST ASCII CHARACTER ON IT 


3 sRETURN 

3;STORAGE FOR ASCII CHAR. TO TYPE 
33 TERMINATOR 

;;RESERVE 8 BYTES FOR TTY INPUT 
3;CONTROL “U" 

s;CONTROL “G" 


READ AN OCTAL NUMBER FROM THE TTY 


Pee P UII riri irri irri riritiritiiiririiitriiTiiittiittTiitt Try 
3@THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
s*CHANGE IT TO BINARY. 


RDOCT 
RETURN HERE 

: MOV (SP), -CSP) 
MOV 4(SP),2(SP) 
MOV RO, -(SP) 
MOV R1,-(SP) 
MOV R2, -(SP) 
ROL IN 
MOV (SP )+,RO 
CLR R1 
CLR R2 
MOVB (RO)+, -CSP) 
BEQ 3$ 
ASL R1 
ROL R2 
ASL R1 
ROL R2 
ASL R1 
ROL R2 


3sREAD AN OCTAL NUMBER 
33LOW ORDER BITS ARE ON TOP OF THE STACK 
:sHIGH ORDER BITS ARE IN $SHIOCT 


ssPROVIDE SPACE FOR THE 

3; INPUT NUMBER 

:sPUSH RO ON STACK 

33;PUSH R1 ON STACK 

3:PUSH R2 ON STACK 

3sREAD AN ASCIZ LINE 

3:GET ADDRESS OF 1ST CHARACTER 
3;CLEAR DATA WORD 


:sPICKUP THIS CHARACTER 
33IF ZERO GET OuT 

3342 

3304 


3348 nN 


SEQ 0432 


Ge 


COKDABO KDJ11-8 CLUSTER MACY y 30( 1046) ie APR-84 16:45 PAGE 434 
COKNAB.P11 OS-APR-84 16:4 D AN OCTAL NUMBER FROM THE TTY SEQ 0433 
22422 136622 042716 177770 BIC otC7,(SP) ssSTRIP THE ASCII JUNK 
22423 136626 062601 ADD (SP)+,R1 :sAD0 IN THIS DIGIT 
22424 136630 000764 BR es 3 sL00P 
22425 136632 005726 3$; TST (SP )-+ 3;CLEAN TERMINATOR FROM STACK 
22426 136634 010166 000012 MOV R1,12¢SP) 33SAVE THE RESULT 
22427 136640 010237 136654 MOV R2, $HIOCT 
22428 136644 012602 MOV (SP)+,R2 3sPOP STACK INTO Ro 
22429 136646 012601 MOV (SP )+,R1 33POP STACK INTO R1 
22430 136650 012600 MOV (SP)+,RO 33POP STACK INTO RO 
22431 136652 000002 RTI : sRETURN 
22432 136654 000000 SHIOCT: .WORD ;:;HIGH ORDER BITS GO HERE 
22433 . SBTTL TRAP DECODER 
22434 
22435 FF PAMAAAHASEALEGAAAEEAASEASCARAAEHEEEEEEEASEEAEEEEEAEEEEEEEEEEEOEEED 
22436 s*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE “TRAP” INSTRUCTION 
22437 3*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
22438 3*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
22439 :#GO TO THAT ROUTINE. 
22440 
22441 136656 010046 $TRAP: MOV RO, -( SP) 33;SAVE RO 
2442 136660 016600 000002 MOV 2(SP),RO 33;GET TRAP ADDRESS 
22443 136664 005740 TST -C€RO) 3:BACKUP BY 2 
22444 136666 111000 MOVB (kO),RO ;;GET RIGHT BYTE OF TRAP 
22485 136670 006300 ASL RO :sPOSITION FOR INDEXING 
22446 136672 016000 136712 MOV $TRPADCRO),RO 3s; INDEX TO TABLE 
22447 136676 000200 RTS RO 3;GO TO ROUTINE 
22448 
22449 
ety 3;THIS IS USE TO HANDLE THE “GETPRI” MACRO 
22452 136700 011646 $TRAP2: MOV (SP), -(SP) 3sMOVE THE PC DOWN 
22453 136702 016666 000004 000002 MOV 4(SP),2(¢SP) :;sMOVE THE PSW DOWN 
coors 136710 000002 RTI ssRESTORE THE PSw 
ooeat -SBTTL TRAP TABLE 
22458 3*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
22459 :*BY THE “TRAP” INSTRUCTION. 
22460 
22461 : ROUTINE 
22462 ; | eenepew 
22463 136712 136700 $TRPAD: .WORD $TRAP2 
22464 136714 134762 $TYPE 3sCALL=TYPE TRAP +1(0104401) TTY TYPEOQUT ROU INE 
22465 136716 135342 $TyYPOC ;;CALL=TYPOC TRAP +2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
22466 136720 135316 $TYPOS ;;CALL=TYPOS TRAP +3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS?) 
22467 136722 135356 $TYPON ;;CALL=TYPON TRAP +4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
Soeee 136724 135544 $TYPDS ;;CALL=TYPDS TRAP +S5( 104405) TYPE DECIMAL NUMBER (WITH SIGN) 
node 136726 136040 $GTSWR ;;CALL =GTSWR TRAP +6( 104406) GET SOFT-SWR SETTING 
22472 136730 135770 $CKSWR ;;CALL=CKSWR TRAP+7(104407) TEST FOR CHANGE IN SOFT-SwR 
22473 136732 136252 $ROCHR ;;CALL=RDCHR TRAP +10( 104410) TTY TYPEIN CHARACTER ROUTINE 
22474 136734 136402 oad :sCALL=ROLIN TRAP+11(0104411) TTy TYPEIN STRING ROUTINE 
22475 136736 136554 $RDOCT ;;CALL=RDOCT TRAP +12(104412) READ AN OCTAL NUMBER FROM TT) 
seer? -SBTTL POWER DOWN AND UP ROUTINES 


s 


COKDABO KDI11-B Gystes MACY 11 
COKDAB.P11 O05 - APR -84 


22478 
22479 


136740 
136746 
136754 
136756 
136760 
136762 
136764 
136766 
136770 
136774 
137000 
137006 
137010 


137012 
137020 
137024 
137030 
137034 
137036 
137042 
137044 
137046 
137050 
137052 
137054 
137056 
137064 
137072 
137074 
137076 
137100 
137102 
137104 
137106 
137114 


012737 
012737 
010046 
010146 
010246 
010346 
010446 
010546 
017746 
010637 
012737 


000000 
000776 


012737 


16:45 


137100 
000340 


042144 
137104 
137012 


137100 
137104 
137104 
137104 


042076 


136740 
000340 


047520 


30( 1046) 


000024 
000026 


000024 


000024 


000024 
000026 


042527 


05 - APR - 84 
POWER 


He 
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DOWN AND UP ROUTINES 


FEFSAAASAHAEHASEHSEEOASEEEEHAEHEEEEAEEEEEEEESEEESESEEEASESESAEREHHRESEHEOED 
sPOWER DOWN ROUTINE 
#SILLUP,@OPWRVEC ;;SET FOR FAST UP 
9340, B2PWRVEC+2 ;;PRIO:7 
33PUSH RO ON STACK 
33PUSH R1 ON STACK 
33PUSH R2 ON STACK 


$PWRON: MOV 


SP, $SSAVR6 


33SAV 
@$PWRUP, QePwRVEC SET 


2 


3;PUSH - ON STACK 


3;HANG UP 


UP VECTOR 


FF PPSSHSAHAHASSESSSHHHEEHEEESASEEEESEEEEEEEEHAEEESESEEEEECHESELEHEEEEOS 


sPOWER UP ROUTINE 


3sWAIT LOOP FOR THE TTY 


INTO @SwWR 
INTO RS 
INTO R4 
INTO R3 
INTO R2 
INTO R1 
INTO RO 


POP STAC 
@SPWRON, @OPWRVEC + 3SET ¥ THE POWER DOWN VECTOR 


sREPORT THE POWER FAILURE 
+sPOWER FAIL MESSAGE POINTER 


33 THE POWER UP SEQUENCE WAS STARTED 
33; BEFORE THE POWER DOWN WAS COMPLETE 


$PWRUP: MOV @SILLUP,@OPWRVEC ;;SET FOR FAST DOWN 
MOV $SAVR6, SP 3;GET SP 
CLR $SAVR6 
1$; INC $SAVR6 3sWAIT FOR THE INC 
BNE 1$ 3;O0F WORD 
MOV (SP )+,@SwR 33POP STACK 
MOV (SP)+,R5 :3;POP STACK 
MOV CSP)+,R4 3;POP STACK 
MOV (SP )+,R3 33POP STACK 
MOV (SP )+,R2 33POP STACK 
MOV CSP )+¢,R1L 4 A STACK 
MOV (S°)+,RO TACK 
MOV 
ae 9340, @OPWRVEC + 2 :3PRIO:7 
Y 
$PWRMG: — SPOWER 
SILLUP;: HALT 
BR .-2 
$SAVR6: O 33;PUT THE SP HERE 
SPOWER: .ASCIZ <15><12>"“POWER” 
.EVEN 


-END 


SEQ 0434 
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COKDAB 


ALR4TS 


-P1l 


#000005 


OS -APR-84 16:45 


021716 


BITOS 
BITO9 
BIT1 

BIT10 
BIT11 
BIT12 
BIT13 


wD 

_ 

“4 

a 
oree#seese#neuseeee 


CSR12 


002604 


2 
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SEQ 0435 


or 
Je 
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COKDAB .P 11 0S -APR-84 16:45 SYMBOL TABLE SEQ 0436 
EM17 123332 EM76 126300 FIN6 053054 KDPAR2= 172364 ‘ MAC3 051076 
EMe 122650 —EM77 126350 FIN? 053274 KDPARS= 172366 MAC4 051112 
EM20 123376 ENDHRT 102634 FLAG 002776 KOPAR4= 172370 MACS 051126 
EM21 123431 ENDLUP 110444 FLO 003022 KDPARS= 172372 MADCC 015760 
EM22 123474 ENDMOV 110526 FLOAT 003012 KOPAR6= 172374 MAIREG= 177750 
EM23 123533 ENDTAG 111630 FMPARR 102306 KDPAR7= 172376 MALCC 016606 
EM24 123607 ENDTLP 110414 FPVEC = 000244 KDPORO= 172320 MARCC 016666 
EM2?5 123652 ERR 133442 FRSTST 0045.4 KOPOR1= 172322 MASK 003120 
EM26 123712 ERRFP 133440 FSTADD 110520 KDPOR2= 172324 MA11 010632 
EM27 123761 ERROR = 104000 FWOSEQ 110506 KDPOR3= 172326 MASS 011536 
EMS 122662 ERROUT 101700 GOODAD 002770 KDPOR4= 172330 MBB11 010730 
EM30 124021 ERRVEC= 000004 GPROTS 004726 KOPORS= 172332 MBB22 011212 
EM31 124073 ERTYPE 131740 GPR1TS 005004 KDPOR6= 172334 MBCCC 015502 
EM32 124120 EXBAD 110460 GPR2ETS 005062 KDPDR7= 172336 MBCOO)§8=—:«0O.110434 
EM33 124161 EXBAD2 111602 GPR3TS 005140 KIPARO= 172340 MBC11 011010 
EM33a 124223 EXITST 110470 GPR4TS 005216 KIPAR1= 172342 MBC22 011300 
EM35 124263 EXPBDT 105632 GPRSTS 005274 KIPAR2= 172344 MBIOO 010354 
EM36 124311 EXPDAT 110502 GPR6TS 005352 KIPAR3= 172346 MBPTC 030434 
—M37 124355 EXPIR1 034164 GISWR = 104406 KIPAR4= 172350 MBSCC 015554 
Ema 122674 EXPTBL 102672 HITMIS= 177752 KIPARS= 172352 MBT 032544 
EM40 124417 EXPWOT 105622 HMPARR 102460 KIPAR6= 172354 MBTA 032566 
EM41 124464 FINNOP 021070 HOP10 065502 KIPAR7= 172356 MBTB 032570 
EM42 124550 FINI 052174 HOP11 066444 KIPORO= 172300 MBTCC 015432 
EM43 124576 FIN1O 053514 HOP12 067452 KIPOR1= 172302 MB TO 032600 
EM44 124627 FIN11 053610 HOP13 070450 KIPOR2= 172304 MBTE 051476 
EM45 124667 FIN116 022560 HOP14 071510 KIPOR3= 172306 MBTF 032610 
EM46 124751 FIN117 022674 HOP15S 073150 KIPOR4= 172310 MBTO 032622 
EM47 125041 FIN120 023016 HOP16 073450 KIPORS= 172312 MBTOA 032652 
EMS 122734 FIN121 023414 HOP17 074102 KIPOR6= 172314 MBTOB 032654 
EMSO 125126 FIN122 023664 HOP18 076102 KIPOR7= 172316 MBTOC 032666 
EMS1 125151 FIN125 025026 HOP19 076504 KMCR = 177734 MBTOD 032712 
EMS2 125203 FIN126 026066 HOP20 100074 LASTCH 112426 MBTOE 032714 
—MS3 125241 FIN127 026526 HOP21 101130 LCOSUB 076372 MBTOF 032726 
EMS4 125275 FINI3 053774 HOP22 101556 LCFSUB 075770 MBT1 050760 
EMSS 125333 FIN130 027416 HOP44 064350 LOPARS 132320 MBT2 050762 
EMS6 125367 FIN14 054124 HT = 000011 LOPORS 132350 MBT2A 050774 
EMS7 125413 FINIS 054312 ILAOA 030600 LEOS 116672 MBTS 051204 
EM6 122767 FIN16 054456 ILB0B 030606 LF = 000012 MBT8A 051234 
EM60 125445 FINI? 054640 ILt 052674 LKS * 177546 MBT8B 051256 
EM61 125513 FIN2 052270 ILLBOA 030674 LKSFL 002702 MBT8C 051300 
EM62 125542 FIN20 055012 ILLBOB 030702 LKSINT 132444 MBT8D 051322 
EM63 125613 FIN21 055202 ILLOP1 052530 L 004562 MBTS8E 051346 
EM64 125644 FIN22 055346 ILLOP2 052604 LOOPIN 003114 MBTSF 051372 
EM65 125703 FIN23 055466 INITMM 132156 LOST 052160 MBT8FG 051406 
=M66 125753 FIN24 055642 IN@22 121324 LOWADD 002766 MBT8I 051432 
EM67 126012 FIN26 056322 INTERR 104730 LSTADD 110522 MBE6 011612 
EM? 123032 FIN27 056630 INTRPC 104706 LXPSUB 077654 MCB44 011456 
EM70 126047 FIN3O 057140 IOTOA 030206 MACCC 016034 MCLRD 074136 
EM71 126100 FIN31 057260 IOTOB 030214 MACE 051142 MCLRI 074214 
EM72 126134 FIN32 057532 IOTVEC= 000020 MACO 051032 MCMPD 064050 
EM73 126172 FIN33 060006 IOXXx 033340 MACOA 051036 MCTSCC 015704 
EM74 126216 FINS 052610 KDPARO= 172360 MAC1 051046 MDAO 010230 


EM7S 126247 FINS 052700 KDPAR1= 172362 MAC2 051062 MOCCC §O1L5622 


Ke 
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COKDAB.P11 OS-APR-84 16:45 TABL SEQ 0437 
MDDSUB 072704 MITO 032144 MJSR4B 0135772 MMODD §=071510 SCF 191130 
MOF SUB 071234 MITOA 032174 MJSRS 014166 MMODF 070450 MSOF 073450 
MDIVD 065502 MITOB 032176 MJSRSA 014200 MMRLS 012274 MSER = 177744 
MDIVF 064350 MITOC 032210 MJSRSB 014224 MMRO = 177572 MSFD 073150 
MDMO 010204 MITOD 032234 . MJSR6 014102 MMRL = 1775/4 MSFOI 074102 
MOM27 010314 MITOE 032236 MJSR6A 014114 MMR2 = 177576 ™SOB 017316 
MDSO 010260 MITOF 032250 MJSR6B 014140 MMRS = 172516 MSPAA 007462 
MEMK 117310 MJ 012542 MJSR7 014250 MMU 133134 MSPAU 027416 
MEMQ 117340 MJP 013374 MJSR7A 014262 MMULD 067452 MSPB 005554 
MEMTO 030240 MJP17 013404 MJSR7E 014306 MMULF 44 MSPBB) 007546 
MET 032262 MJP27 013426 MJU1 012614 MMUTRP 133306 MSPC 005600 
META 032320 MJP27A 013440 MJU1IA 012626 MMVCC =: 0015366 005630 
METB 032330 MJP37 013512 MJU2 012556 MMVEC = 000250 MSPEO 005666 
METD 032340 MJP37A 013524 MJU2A 012570 MM11 010522 MSPF 005730 
ME TF 032350 MJP67 013450 MJU2B 012600 MM22 011070 MSPG 005772 
METO 032370 MJP67A 013462 MJU3 012640 MNCCCC 016116 MSPH 006030 
METOA 032434 MJP67B 013476 MJU3A 012652 MNGOP 061746 MSPI 006074 
METOB 032444 MJP77 013500 MJU3B =: 012662 MNNRM1 060722 MSP J 006134 
METOC 032456 MJP77E 013534 MJU4 012734 MNNRM2 061142 MSPL 006254 
METOD 032502 MJRA 014312 MJU4A 012746 MNNRM3 061274 MSPM 006322 
METOE 032512 MJR27 014346 MJU4B = 012760 MNNRM&4 061416 MSPN 006400 
METOF 032524 MJR27A 014402 MJUS 012674 MNRM 062600 MSPO 006446 
MFA 051500 MJR27B 014422 MJUSA 012706 MODEL 045654 MSPP 006552 
MFACU 051476 MJR37 014504 MJUSB = 012720 MODE2 047234 MSPQ 006650 
MFSRCM 060010 MJR37A 014540 MJU6 012774 MODGAR 071500 MSPR 006 756 
MIA' Lt 033140 MJR6A 014500 MJU6A 013006 MRLB1 012022 MSPS 007044 
MIALLA 033164 MJR6B 014502 MJU7 013026 MRLCC 016370 MSPT 007112 
MIALLB 033166 MJR67 014424 MJU7E 013040 MRLO 011750 MSPU 007130 
MIALLD 033176 MJR67A 014460 MJ2 012612 MRL? 012102 MSPV 007230 
MIALLF 033206 MJR77 014560 MJS 012772 MRL 3 012160 MSPVO 007174 
MIL 022740 MJR77A 014614 MJ7 013022 MRL4 012234 MSPX 007274 
MILA 032764 MJSI 033220 MLCD 076102 MRL6 012336 MSPY 007344 
MILAO 030532 MJSIA 033252 MUCF 075264 MRL 7 012374 MSPZ 007412 
MILB 032766 MJSIB 033254 MLOC 063502 MRRB1L = 012514 MSPO 005532 
MILD 032776 MJSIC 033266 MLOC2 075164 MRRCC 016450 MSTB3 007616 
MILF 033006 MJSID 033312 MLODM2 060060 MRRO 012472 MSTO 030722 
MILLBO 030632 MJSIE 033314 MLDOM3 060146 MRT 031344 MSTOE 030776 
MILLO 030044 MJSIF 033326 MLDOM4 060262 MRTA 031366 MSTOEE 031004 
MILLOA 030110 MJSR 013534 MLDDOMS 060366 MRTB 031370 MST4 007670 
MILLOB 030116 MJSRA 013652 MLODM6 060456 MRTE 031400 MST4B 007726 
MILO 033¢20 MJSRB 014016 MLDDM7 060542 MRTF 031410 MSTS 007766 
MILOA 033052 MJSRC 014164 MLOM27 060630 MRTO 031422 MSTSB 010020 
MILOB 033054 MJSR1 013654 MLOSUB 070236 MRTOA 031452 MST6 010062 
MILOC 033066 MJSR1IA 013666 MLFSUB 067240 MRTOB 031454 MST7 010130 
MILOD 033112 MJSR1B 013712 MLS1 074250 MRTOC 031466 MSW37 012436 
MILOE 033114 MJSR2 013572 MLS2 074342 MRTOD 031512 MSXP 101272 
MILOF 033126 MJSR2A 013604 MLS3 074434 MRTOE 031514 MSXT 017120 
MIOT 032066 MJSR2B 013630 MLS4 074544 MRTOF 031526 MSXTCC 0167 
MIOTA 032110 MJSR3 014020 MLSS 074640 MRTS 014620 MS11 010670 
MIOTB 032112 MJSR3A 014032 MLS6 074750 MSB 062456 MS22 011142 
MIOTOD 032122 MJSR3B 014056 MLS7 075050 MSBCC 016234 MS33 OLL372 
MIOTF 032132 MJSR4 013734 ML XP 076504 MSBCCC 016304 MS77 Ollos6e 


MIOTO 030142 MJSR&A 013746 MMARK 017372 mMSCD 100074 MTP 031540 
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COKDAB .P11 05 -APR-84 1 SYMBOL TABL SEQ 0438 
MTPA 031742 NULL * 000000 PR2 = 000100 SDPAR6= 172274 SWREG 000176 
MTPAA 032016 “INXMFIN 047456 PRS = 000140 SDPAR7= 172276 SwOoO) * 000001 
MTPAE 032046 NXMPAR 106022 PR4 = 000200 SDPDRO= 172220 SWwOO = 000001 
MTPAH 032014 NXMTRP 047064 PRS = 000240 SOPOR1= 172222 SwOl = 000002 
MTPAL 032004 ODDXx 033440 PR6 = 000300 SOPOR2= 172224 SWwO2 = 000004 
MTPB 031572 OK 133342 PR7 = 000340 SDPOR3= 172226 SWwO3 = 000010 
MTPF 031612 OKAY7 042676 PS = 177776 SDPOR4= 172230 SWO4 = 000020 
MTPO 031624 OKAY7A 042706 PSW = 177776 SDPORS= 172232 SwoS = 000040 
MTPOA 031654 OKA7 042664 PSWBTS 005434 SDPDR6= 172234 SWO6 * 000100 
MTPOB 031656 ' OK1 133370 PWRVEC= 000024 SDPOR7= 172236 SWO7 = 000200 
MTPOC§ 031670 OK7 042646 Q22EN 002752 SEQ 003032 SWwO8 = 000400 
MTPOD) 8 031714 ONOG22 132676 Q22INT 132732 SFOSUB 073344 SWO9 = 001000 
MTPOE 031716 PAR 133256 Q22esIZ 132452 SIMGOA 002662 SW1 = 000002 
MTPOF 031730 PARAD1 045504 RAMPAR 132374 SIPARO= 172240 SW10 = 002000 
MTPQ 031602 PARAD2 047116 RBUF = 177562 SIPAR1= 172242 SW11l = 004000 
MTPR 031570 PARVAL 045536 RCSR = 177560 SIPAR2= 172244 SWl2 = 010000 
MTRPO) 030336 PARVA2 047150 ROCHR = 104410 SIPAR3S= 172246 SW13 = 020000 
MTRY 027560 PARVA3S 047266 ROLIN = 104411 SIPAR4= 172250 SW14 = 040000 
MTRYA 027634 PAR1 133260 RDOCT = 104412 SIPARS= 172252 SWi1S = 100000 
MTRYB 027654 PCR = 177522 RECDAT 110504 SIPAR6= 172254 SW2 = 000004 
MTRYM 027706 POR 133234 RECDST 003102 SIPAR7= 172256 Sw3 = 000010 
MTSO 015366 POR1 133236 RECFEC 003062 SIPORO= 172200 SwW4 = 000020 
MTT 031016 PHY1 045622 RECST 003072 SIPOR1= 172202 SWS = 000040 
MTTA 031052 PIR = 177772 RESVEC= 000010 SIPOR2= 172204 SW6 = 000100 
MTTB 031054 PIRQ = 177772 RET1L 015104 SIPOR3= 172206 SW? = 000200 
MTTD 031064 PIRQNX 034042 RET2 015172 SIPOR4= 172210 Sw8 = 000400 
MTTE 031074 PIRQT 121614 RET3 015250 SIPORS= 172212 SWw9 == 001000 
MTTR 031200 PIRQVE= 000240 RITEDA 110512 SIPOR6= 172214 SXPSUB 101452 
MTTRA 031244 PIRRTN 034342 RTSE 014672 SIPOR7= 172216 TAB1L 003174 
MTTRB 031246 PIRTBL 034144 RTS1 014640 SIXBIT 111774 TAB1O §=—«.: 00 33324 
MTTRC 031260 PIRTEX 034044 RTS6 014650 SLEND 116510 TAB1L 003334 
MTTRD 031316 PIRXXX 034006 RXXX 033660 SLOCOO 002762 TABLIA 003344 
MTTRE 031320 PIR1 034044 R6 =%000006 SLOCOL 002764 TAB12] 003354 
MTTRF 031332 PIR] 034164 R7 =%000007 SPAUL 027434 TAB13 003364 
MTTS 031106 PIR2EX 034272 SAVBR 002710 SPAV2 027456 TABi3B 003374 
MTTSA 031142 PIR3 034272 SAVMRO 003004 SPAU3 027476 TAB1S4 003404 
MTTSB 031146 PIR3SEX 034366 SAVMR1 003006 SPAU4 027522 TAB1IS 003414 
MTTSD 031156 PIR4 034366 SAYMR2 003010 SPAUS 027536 TAB16 8 003424 
MTTSE 031166 PIRS 034444 SAVPCR 002706 SPAU6 027554 TAB17 003434 
MTTSQ 031144 PIRSEX 034654 SAVPOS 003116 SPS 003034 TAB18 003444 
MUVAD 062710 PIR6 034654 SAVSUP 003000 SPSJ 003036 TAB2 003204 
MXDF1 061526 PIR6EX 034756 SAVUSE 003002 SRO = 177572 TAB21 003454 
MxOR 017236 PITBL1 034250 SAV30 004052 SR1 = 177574 TAB22 003464 
MXRCC 017026 PITBL2 034640 SAV32 004054 SR2 = 177576 TAB23 00347 
M2 004610 PI1l 034314 SCOSUB 100714 SR3 = 172516 TAB24 = 003504 
M3 004624 PI2 034326 SCOPE = 000004 STACK = 001100 TAB25 003514 
M4 004644 PI3 034330 SOFSUB 073700 START 003764 TAB26 8003524 
MS 004664 PLFO 043514 SOPARO= 172260 STBOT = 001000 TAB27 003534 
M6 004704 PLF1 043706 SOPAR1= 172262 STKLMT= 177774 TAB28 003544 
NEWADD 002774 POLY = 120001 SDPAR2= 172264 STMOVI 107662 TAB29 =: 0035554 
NEWDAT 110514 PROCNT 022744 SDPAR3+ 172266 STMOVT 110764 TAB29A 003564 
NOABRT 134512 PRO = 000000 SDPAR4= 172270 SUBT 051766 TABS 003214 


NOTOK 133364 PR1 = 000040 SDPARS= 172272 SWR 001140 TAB3O §=—«.: 00 335 “4 
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COKDAB.P11 OS -APR-84 16:45 SYMBOL TABLE SEQ 0439 
TAB31 003604 TE117 022560 TSFP2 052176 TSMM16 050014 TstS2 116272 
TAB3S2 003614 TELL7A 022672 TSFP20 054642 TSMM6A 037746 TSTS3) =©116510 
TAB33 003624 TE120 §=—6.: 0226 76 TSFP21 055014 TSMM6B 040404 TSTS4 =. 117016 
TAB34 8003634 TE1L20A 022752 TSFP22 055204 TSMM6C 041144 TSTSS)§ = §=117372 
TABS 003224 TE121 023026 TSFP23 055350 TSMM6D 041644 TSTS6 =6.11 7640 
TABS0 §=—: 00 36.44 TE122 §=6023414 TSFP24 055470 TSM16A 050110 TSTS7 §=117760 
TAB41 003654 TE123 023666 TSFP25 055644 TSM16B 050136 TST6 102466 
TABS2 003664 TE124 024106 TSFP26 055762 TSM16C 050162 TST60 §=120142 
TABS3 §=6003674 TE125 024340 TSFP27 056324 TSM16D 050226 TST61 121162 
TAB4S5 003704 TE125A 024600 TSFP3 052270 TSM7 042724 TST62 8=121440 
TABS6 =003714 TE126 §=©6025026 TSFP30 056632 TSM9 043330 TST63 = 121624 
TABS7 §=©003724 TE126A 025074 TSFP31 057142 TSTADD 002772 TST64 §=121724 
TABS7A 003734 TE126B 025550 TSFP32 057262 TSTLOC 003122 TST65 122106 
TABS8) = 003744 TE127 026066 TSFP33 057534 TSTLUP 107744 TST66 8122606 
TABS9 =—s-:« O03 754 TE1L27A 026266 TSFP4 052364 TsTl 004562 TST? 102710 
TABS 003234 TE130 6026530 TSFPS 052610 TST10 =—&. 103146 TS10 044374 
TABSA 003244 TE130A 027006 TSFP6 052700 TST1l 103372 TS1001 053464 
TAB6 003254 TF114 §=©021046 TSFP7 053054 TST12 §©103630 TS1002 053474 
TAB6A 003264 T6114 §=021056 TSF10 053460 TST13. = 104012 TS1004 053504 
TAB? 003274 THRBIT 112252 TSF13 053770 TST14 §=©6104310 TS11 044574 
TABS 003304 TH114 021066 TSF14 §=©054120 TSTIS) =: 104436 TS1101 053600 
TABS 003314 TIMDEL 114452 TSF1S 054306 TST16 §=—104632 TS12 045232 
TAPABO 104426 TIMEOU TSF16 4 §©054452 TST17 + =©105000 TS14 046754 
TA114 =. 021006 TIMOUT 002750 TSF17 054634 TsT2 101556 TS15 047640 
TAI16 =. 022.462 TKVEC = TSF2 052244 TST20 §©105172 TS16 050644 
TBITVE= 000014 TMM16A 050354 TSF20 055006 TST2l 105654 TS16A 050636 
TB114) =—6.021016 TMM16B 050234 TSF21 055176 TsTt22 106032 TS1822 045706 
TC114 §=6.021026 TMM16C 050264 TSF22 055342 TST23 106230 TS2600 056242 
T0114 = 0021036 TMM16D 050314 TSF23 055462 TST24 106550 TS2601 056252 
TEMP 002710 TMM16E 050344 TSF24 055636 TST2S5 107306 TS2602 056262 
TE102 »§=017576 TMM16F 050346 TSF31 057254 TST26 § 107432 TS2603 056272 
TE103) §=017620 TM16A 050740 TSF6 053050 TST27 §=110526 TS2604 056302 
TE104 §=6017642 TOUT 133124 TSF7 053240 TsT3 101704 TS2605 056312 
TE10S = 0017664 TPVEC = 000064 TSLOOP 111072 TST3O 8=—«.: 1116 30 TS2700 056550 
TE106 «=: 017706 TRAPVE= 000034 TSMA 042736 TST31 112002 TS2701 056560 
TE107 §=017730 TRPFLG 133436 TSMB 042756 TST32 =. 112260 TS2702 056570 
TE110 §=©017752 TRPOA 030402 TSMC 042/66 TST33) =. 112564 TS2703 056600 
TE111 017774 TRP 030410 TSMMUO 014674 TST34 112716 TS2704 056610 
TE112 §=©020016 TRTVEC= 000014 TSMMUL 034772 TST3S §=113066 TS2705 056620 
TE113 020240 TRYMA 027746 TSMMU2 035056 TST360=—s-: 1113 352 TS30D0 057060 
TEL13A 020460 TRYMB 030000 TSMMUS 036256 TST37 =6113520 TS3001 057070 
TE114 §=6©0200632 TRYMC 030026 TSMMU4 036556 TST4 101752 TS3002 057100 
TE115 022002 TSO31 057166 TSMMUS 037506 TST4O0 3=—.: 111 4014 TS3003 057110 
TELISA 022212 TSEND 111612 TSMMU6 037640 TST41 114172 TS3004 057120 
TEL1SB6 022222 TSFP1 052112 TSMMU7 042344 TST42 86114462 TS3005 057130 
TE1ISC 022230 TSFP10 053274 TSMMUB 042772 TST43 =: 114522 TS3200 057452 
TE1150 022236 TSFP11 053514 TSMMUD 043174 TST44 114620 TS3201 057462 
TELISF 022244 TSFP12 053610 TSMM10 044074 TST45 = =6114702 TS3203 057502 
TE116 §=—6. 0222246 TSFP13 053650 TSMM11 044456 TST46 =: 115116 TS3204 057512 
TELI6A 022522 TSFP14 053774 TSMM12 044714 TST47 =6115160 TS$3205 057522 
TEL168 022526 TSFP1S 054126 TSMM13 045302 TsTS 102320 TS3300 057726 
TE116C 022540 TSFP16 054314 TSMM14 046350 TSTSO) 8=—_:«11 55354 TS330i 05°736 
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TSt80S O577S6 UDPDOR2+ 177624 SBELL §=—©_: 0011 70 SFFLG 134760 SROCHR 136252 
TO85D4 60057766 UDPORS- 177626 sCOwi 001260 sFTLLC 001156 SROLIN 136402 
TSS50S OS7T% UDPOR4+ 177650 sCOw2 001262 sFTiLS 001155 sRDOCT 136554 
"sepa =: © 8080 UOPORS= 177632 SCHARC 135312 $GO4DR 001120 $R0SZ = 000010 
TSeDaT 055060 UDPORG- 177634 sCKSWMR 135770 $GDOAT 001124 SRTNAD 133622 
ts? 042614 UDPOR7= 177636 SCMTAG 001100 $GET42 133600 SSAVR6 137104 
TS7OAL 058246 UFOFLG scmS SGTSWR 136040 SSCOPE 133644 
"s"Da2 0538256 UWFOSET« 1 $ . sD «+ 000001 SSETUP= 000137 
ee he. | UIPARO= 177640 SCNTLG 136525 SHIB1S 000232 $STUP = 177777 
TS'FIN O4277O UIPARI« 177642 SCNTLY 136520 SHIOCT 136654 $SVLAD 134060 
1S IN 0446072 UIPAR2> 177646 tCPUOP 001226 SICNT 001104 $svPC = 000282 
TYPOS + 106405 UIPARS> 177646 scmrF 0 = 001175 sIL.uP 137100 $SuR = 167400 
TYPE «* 106401 urIPama- 177650 s08." 135760 SINTAG 001135 $SWREG 001222 
TYPOC + 104402 . UIPARS« 177652 s00“0 4060001264 sITEMB 001114 $5 eR = 

TYPON = 106608 UIPame- 177654 s00wl 001266 sur 001176 STESTN 001204 
TrPOS « 100608 UIPART> 177656 s00wl0 001310 SLFLG 134757 STIMES 001164 
TIOFIN 066456 UIPORO= 177600 s00wii 001312 SLPADR 001106 sTKB 001146 
TLIF IN O86714 UIPORI= 177602 s00wi2 001314 SLPERR 001110 TKS 001144 
T23 O20 Pes UIPOR2= 177606 s00wlS 001316 sMADR1 001232 $T™PQ 3=—.: 0011160 
Tile 0226 80 UIPORS= 1/7606 s00wi4 001320 SMADR2 0012% sT™P1 001162 
TlLa Is 045300 UIPOR4> 177610 s00wiS 001322 SMADRS 001242 $™N © 000067 
T1228) 48=— 2 SS12 VIPORS= 177612 001270 SMADRE 001246 sTPB 001152 
T1228) = 2 3644 UIPOR6> 177614 s00wS 001272 SMAIL 001200 STPFLG 001157 
T1284 OPBOSO VIPORT= 177616 s00ws 86001274 SMAMS1 001230 $TPS 001150 
32238 026060 WaPIR 034270 s00wS 46 001276 SMAMS2 001234 STRAP 136656 
"12380 028086 vOvIET s00w6 0012 SMAMSS 001240 STRAP2 136700 
T2230 O2e074 vIRi 045570 s00u? 001302 SMAMSS 001246 sTRe = 000013 
1230s wIR2 047202 s00w8 001306 SMBADR 000234 STRPAD 136712 
"128 §©024102 viIRs 047520 001 806 sFLG §861347S6 sTStm 

T1244 0 8§=60.24302 vexOR 6004062 SDEvCT 001210 sNEW «=: 1 3654 5 sTSTNM 001102 
T1268 )0= 24812 vQBEr 002656 sOEve 86001256 SMSGAD 001214 $TTYIN 136510 
T324C = 24 820 vQBE2 002676 SDOAGN 133620 $™SGQ.G 001216 $TYPOS 135544 
32400 O26 S26 voPRi 002660 sO0'e&. 135750 $MSGTY 001200 STYPE 134762 
T1246) «= O24 850 wora2 002700 SENDAD 133610 SSW «136532 STYPEC 135174 
Tleee) =. O}S S34 uc 002652 sEMOCT 135556 sMTYPL 001231 STYPEx 135314 
TIS IN O8S?us “2 002672 SENO™G «133627 sMTYP2 001235 sTrPOC 135342 
"16 04 7000 mOTRe 1533426 SEMAL 133626 SMTYPS 001241 STYPON 135356 
T147IN 6047352 "BF + 1775664 SEN 001220 sMTrP4 0012465 sTYPOS 135316 
v3 osTr10 eCBIT 016526 stNv™ §=6001221 SMxCNT 1534150 SUNIT OO1212 
TiSa 067 "et =CSR + 177566 seo 133514 SMALL CO115S4 SUNITM 000242 
"1% IN 4os0014 ME100 017532 SEOPCT 133550 stu TST= 000000 SUSMR 3=—-: 001224 
OP ARO 177660 WELOL 01°5SS6 tERFLG O01108 SOCNT 135540 SvECTL 001250 
DPM 177662 SAPTr® 000232 s€Meax 001115 SOMOOE 1535542 $vECT2 O01252 
SOP OR2+ 177664 satrC 134549 SERROR 1541582 SOVER 134114 SxOFF = 
DPS 1766 satra 86354516 SERRPC OOLLIG $PASS 001206 $x0ON = 000021 
PP me- 17TETO satrS 134522 s€RRTR O01 SPAST™ 000240 SxTSTR 133656 
PM LTT? satra 1345382 s€BT™ OO1L12 SPOWER 137106 $$GET4- 

LP te 17778 sauTOB 001154 SESCAP OOL1E6 SPWRON 136740 sOFTit 135541 
Pas Te SBASE 00° 2% s€ 1A «=—.0001 220 sPuRnG «137074 * 137Lle 
SPOR 17620 880408 00°122 SETEND O01 S26 sPwRP 1387012 $x * 900232 
POR. 1 422 sBUDAT OX 126 atm 01202 $Q.ES 01174 
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